Canola  0.8.D001
lib/number/z/right_16.cc
Go to the documentation of this file.
00001 //
00002 // canola - canon canola 1614p emulator
00003 // Copyright (C) 2012 Peter Miller
00004 //
00005 // This program is free software; you can redistribute it and/or modify
00006 // it under the terms of the GNU General Public License, version 3, as
00007 // published by the Free Software Foundation.
00008 //
00009 // This program is distributed in the hope that it will be useful,
00010 // but WITHOUT ANY WARRANTY; without even the implied warranty of
00011 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00012 // General Public License for more details.
00013 //
00014 // You should have received a copy of the GNU General Public License along
00015 // with this program. If not, see <http://www.gnu.org/licenses/>.
00016 //
00017 
00018 #include <lib/number/z.h>
00019 
00020 
00021 number_z
00022 number_z::right_16(void)
00023     const
00024 {
00025     if (digits_used <= 16)
00026         return *this;
00027     number_z result;
00028     for (size_t j = 0; j < 16; ++j)
00029         result.set(j, get(j));
00030     return result;
00031 }
00032 
00033 
00034 // vim: set ts=8 sw=4 et :