X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/c7f552fd8888da2f0d8cfb228fe0f28d3df3a12c..b4b6f2ea75b9f0f3ca918f5b84016610bf7a4d4f:/interpretor/faust-0.9.47mr3/compiler/tlib/num.hh

diff --git a/interpretor/faust-0.9.47mr3/compiler/tlib/num.hh b/interpretor/faust-0.9.47mr3/compiler/tlib/num.hh
deleted file mode 100644
index 748f526..0000000
--- a/interpretor/faust-0.9.47mr3/compiler/tlib/num.hh
+++ /dev/null
@@ -1,145 +0,0 @@
-/************************************************************************
- ************************************************************************
-    FAUST compiler
-	Copyright (C) 2003-2004 GRAME, Centre National de Creation Musicale
-    ---------------------------------------------------------------------
-    This program is free software; you can redistribute it and/or modify
-    it under the terms of the GNU General Public License as published by
-    the Free Software Foundation; either version 2 of the License, or
-    (at your option) any later version.
-
-    This program is distributed in the hope that it will be useful,
-    but WITHOUT ANY WARRANTY; without even the implied warranty of
-    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-    GNU General Public License for more details.
-
-    You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
-    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- ************************************************************************
- ************************************************************************/
- 
- 
- 
-/*****************************************************************************
-******************************************************************************
-								NUM 
-						Y. Orlarey, (c) Grame 2002
-------------------------------------------------------------------------------
-Nums are tagged unions of ints and floats. Nums are completly described by 
-the num.h file, there is no num.cpp file.
-
- API:
- ----
-	num(10);				: num with int content
-	num(3.14159);			: num with double content
-	
-	num op num				: op is any C binary operator
-	
-	type(num)				: 0 = int, 1 = double
-	int(num);				: int content of num or conversion
-	double(num);				: double content of num or conversion
-	
- History :
- ---------
- 	2002-02-08 : First version
-	
-******************************************************************************
-*****************************************************************************/
-
-
-#ifndef     __NUM__
-#define     __NUM__
-
-
-//-------------------------------------------------------------------------
-// Class num = (int x (int + double))
-//-------------------------------------------------------------------------
-class num
-{
-	int		fType;
-	union { 
-		int 	i; 
-		double 	f;
-	} fData;
-
- public:
-	// constructeurs
-	num (int x=0) 		: fType(0) 			{ fData.i = x; }
-	//num (double x) 		: fType(1)  		{ fData.f = (double)x; }
-	num (double x) 		: fType(1)  		{ fData.f = x; }
-	num (const num& n) 	: fType(n.fType) 	{ fData.i = n.fData.i; }
-
-	num& operator = (int n) 	{ fType = 0; fData.i = n; return *this; }
-	num& operator = (double n) 	{ fType = 1; fData.f = n; return *this; }
- 	
-	// predicats
-	bool operator == (const num& n) const { return fType == n.fType && fData.i == n.fData.i; }
-	bool operator != (const num& n) const { return fType != n.fType || fData.i != n.fData.i; }
-	
-	// accessors
-	int			type() 		const 	{ return fType; }
-	operator 	int() 		const 	{ return (fType) ? int(fData.f) : fData.i; }
-	operator 	double() 	const 	{ return (fType) ? fData.f : double(fData.i); }
-	
-};
-
-
-inline int isfloat (const num& n) { return n.type(); }
-
-inline const num operator+ (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)+double(y)) : num(int(x)+int(y)); }
-
-inline const num operator- (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)-double(y)) : num(int(x)-int(y)); }
-
-inline const num operator* (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)*double(y)) : num(int(x)*int(y)); }
-
-inline const num operator/ (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)/double(y)) : num(int(x)/int(y)); }
-
-inline const num operator% (const num& x, const num& y)	
-	{ return num(int(x)%int(y)); }
-
-
-// operations sur les bits
-inline const num operator<< (const num& x, const num& y)	
-	{ return num(int(x)<<int(y)); }
-
-inline const num operator>> (const num& x, const num& y)	
-	{ return num(int(x)>>int(y)); }
-
-
-// operations booléennes sur les bits
-inline const num operator& (const num& x, const num& y)	
-	{ return num(int(x)&int(y)); }
-
-inline const num operator| (const num& x, const num& y)	
-	{ return num(int(x)|int(y)); }
-
-inline const num operator^ (const num& x, const num& y)	
-	{ return num(int(x)^int(y)); }
-
-
-// operations de comparaison
-inline const num operator> (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)>double(y)) : num(int(x)>int(y)); }
-
-inline const num operator< (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)<double(y)) : num(int(x)<int(y)); }
-
-inline const num operator>= (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)>=double(y)) : num(int(x)>=int(y)); }
-
-inline const num operator<= (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)<=double(y)) : num(int(x)<=int(y)); }
-
-inline const num operator== (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)==double(y)) : num(int(x)==int(y)); }
-
-inline const num operator!= (const num& x, const num& y)	
-	{ return (isfloat(x)|isfloat(y)) ? num(double(x)!=double(y)) : num(int(x)!=int(y)); }
-
-
-#endif