Canola
0.8.D001
|
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.h> 00019 00020 00021 void 00022 number::strip_redundant_decimal_places(number_z &t3, unsigned &t3ndec) 00023 { 00024 unsigned n = 0; 00025 while (n < t3ndec && t3.get(n) == 0) 00026 ++n; 00027 t3 = t3.shift_right(n); 00028 t3ndec -= n; 00029 } 00030 00031 00032 // vim: set ts=8 sw=4 et :