interpreter/preprocessor/faust-0.9.47mr3/compiler/generator/floats.cpp

   1 /************************************************************************
   2  ************************************************************************
   3     FAUST compiler
   4         Copyright (C) 2003-2004 GRAME, Centre National de Creation Musicale
   5     ---------------------------------------------------------------------
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19  ************************************************************************
  20  ************************************************************************/
  21
  22 #include "floats.hh"
  23
  24 #define FLOATMACRO "FAUSTFLOAT"
  25 #define FLOATCAST "(" FLOATMACRO ")"
  26
  27 //-----------------------------------------------
  28 // float size coding :
  29 //-----------------------------------------------
  30 //          0: external float (macro name)
  31 //          1: single precision float
  32 //          2: double precision float
  33 //          3: long double precision float
  34
  35 extern int  gFloatSize;
  36
  37
  38 const char* mathsuffix[] = {"", "f", "", "l"};                                  // suffix for math functions
  39 const char* numsuffix[]  = {"", "f", "", ""};                                   // suffix for numeric constants
  40 const char* floatname[]  = {FLOATMACRO, "float", "double", "quad"};      // float types
  41 const char* castname[]   = {FLOATCAST, "(float)", "(double)", "(quad)"}; // float castings
  42
  43 const char* isuffix() { return mathsuffix[gFloatSize]; } ///< suffix for math functions
  44 const char* inumix()  { return numsuffix [gFloatSize]; } ///< suffix for numeric constants
  45
  46 const char* ifloat() { return floatname[gFloatSize]; }
  47 const char* icast()  { return castname[gFloatSize]; }
  48
  49 const char* xfloat() { return floatname[0]; }
  50 const char* xcast()  { return castname[0]; }
  51
  52 void printfloatdef (std::ostream& fout)
  53 {
  54     fout << "#ifndef " << FLOATMACRO << std::endl;
  55     fout << "#define " << FLOATMACRO << " " << "float" << std::endl;
  56     fout << "#endif  " << std::endl;
  57     fout << std::endl;
  58     fout << "typedef long double quad;" << std::endl;
  59 }