Canola  0.8.D001
lib/number/print_me.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/ac/stdio.h>
00019 
00020 #include <lib/number.h>
00021 
00022 
00023 void
00024 number::print_me(const char *file, int line)
00025     const
00026 {
00027     std::string s = value.representation();
00028     std::string frac;
00029     while (s.size() <= decimal)
00030         s = "0" + s;
00031     if (decimal > 0)
00032     {
00033         frac = s.substr(s.size() - decimal, decimal);
00034         s = s.substr(0, s.size() - decimal);
00035     }
00036     std::string over;
00037     if (s.size() > 16)
00038     {
00039         over = s.substr(0, s.size() - 16) + "!";
00040         s = s.substr(s.size() - 16, 16);
00041     }
00042 
00043     fprintf
00044     (
00045         stderr,
00046         "%s: %d: %s%s%s.%s\n",
00047         file,
00048         line,
00049         (negative ? "-" : ""),
00050         over.c_str(),
00051         s.c_str(),
00052         frac.c_str()
00053     );
00054 }
00055 
00056 
00057 // vim: set ts=8 sw=4 et :