X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/1059e1cc0c2ecfa237406949aa26155b6a5b9154..66f23d4fabf89ad09adbd4dfc15ac6b5b2b7da83:/interpretor/preprocessor/faust-0.9.47mr3/compiler/signals/sigvisitor.cpp

diff --git a/interpretor/preprocessor/faust-0.9.47mr3/compiler/signals/sigvisitor.cpp b/interpretor/preprocessor/faust-0.9.47mr3/compiler/signals/sigvisitor.cpp
deleted file mode 100644
index a541354..0000000
--- a/interpretor/preprocessor/faust-0.9.47mr3/compiler/signals/sigvisitor.cpp
+++ /dev/null
@@ -1,125 +0,0 @@
-#include "sigvisitor.hh"
-#include <iostream>
-#include <assert.h>
-#include "xtended.hh"
-
-
-using namespace std;
-
-/**
- * Infere the type of a term according to its surrounding type environment
- * @param sig the signal to aanlyze
- * @param env the type environment
- * @return the type of sig according to environment env
- */
-
- 
-void sigvisitor::visit(Tree sig)
-{
-	int 		i;
-	double 		r;
-    Tree		sel, s1, s2, s3, s4, ff, id, ls, l, var, body, type, name, file, cur, min, max, step;
-	
-	assert(sig);
-	
-		 if (isSigInt(sig, &i))					visitInt (sig, i);
-		
-	else if (isSigReal(sig, &r)) 				visitReal (sig, r);
-	
-		
-	else if (isSigInput(sig, &i))				visitInput (sig, i);
-		
-	else if (isSigOutput(sig, &i, s1)) 			visitOutput (sig, i, s1);
-	
-		
-	else if (isSigDelay1(sig, s1)) 				visitDelay1 (sig, s1);
-	
-	else if (isSigPrefix(sig, s1, s2)) 			visitPrefix (sig, s1, s2);
-	
-	else if (isSigFixDelay(sig, s1, s2)) 		visitFixDelay (sig, s1, s2);
-	
-		
-	else if (isSigBinOp(sig, &i, s1, s2)) 		visitBinOp(sig, i, s1, s2);
-		
-	else if (isSigIntCast(sig, s1))				visitIntCast(sig, s1);
-	
-	else if (isSigFloatCast(sig, s1)) 			visitFloatCast(sig, s1);
-
-	else if (isSigFFun(sig, ff, ls)) 			visitFFun(sig,ff,ls);
-
-    else if (isSigFConst(sig,type,name,file))   visitFConst(sig,type,name,file);
-
-    else if (isSigFVar(sig,type,name,file))     visitFVar(sig,type,name,file);
-	
-		
-	//---------------
-	
-	else if (isSigButton(sig, l)) 							visitButton(sig, l);
-	
-	else if (isSigCheckbox(sig, l))							visitCheckbox(sig, l);
-	
-	else if (isSigVSlider(sig, l, cur, min, max, step))		visitVSlider(sig, l, cur, min, max, step);
-	 
-	else if (isSigHSlider(sig, l, cur, min, max, step))		visitHSlider(sig, l, cur, min, max, step);
-	
-	else if (isSigNumEntry(sig, l, cur, min, max, step))	visitNumEntry(sig, l, cur, min, max, step);
-		
-	else if (isSigHBargraph(sig, l, min, max, s1)) 			visitHBargraph(sig, l, min, max, s1);
-		
-	else if (isSigVBargraph(sig, l, min, max, s1)) 			visitVBargraph(sig, l, min, max, s1);
-		
-	else if (isSigAttach(sig, s1, s2)) 						visitAttach(sig, s1, s2);
-	
-				
-	//------------------------
-	
-	else if (isRec(sig, var, body))				visitRec(sig, var, body);
-				
-	else if (isRef(sig, var))					visitRef(sig, var); 
-
-	else if (isProj(sig, &i, s1))				visitProj(sig, i, s1);
-		
-	
-	//----------------------------                                               
-				
-	else if (isSigTable(sig, id, s1, s2)) 		visitTable(sig, id, s1, s2);
-		
-	else if (isSigWRTbl(sig, id, s1, s2, s3)) 	visitWRTbl(sig, id, s1, s2, s3); 
-			
-	else if (isSigRDTbl(sig, s1, s2)) 			visitRDTbl(sig, s1, s2);  
-		
-	else if (isSigGen(sig, s1)) 				visitGen(sig, s1);
-
-
-    else if (isSigDocConstantTbl(sig, s1, s2)) 	visitDocConstantTbl(sig, s1, s2);
-
-    else if (isSigDocWriteTbl(sig,s1,s2,s3,s4)) visitDocWriteTbl(sig,s1,s2,s3,s4);
-
-    else if (isSigDocAccessTbl(sig,s1,s2)) 		visitDocAccessTbl(sig,s1,s2);
-
-	
-	//----------------------------                                               
-				
-	else if (isSigSelect2(sig,sel,s1,s2)) 		visitSelect2(sig,sel,s1,s2); 
-		
-	else if (isSigSelect3(sig,sel,s1,s2,s3)) 	visitSelect3(sig,sel,s1,s2,s3); 		
-	
-	else if (isList(sig)) 						visitList(sig);
-		
-	
-	//----------------------------                                               
-				
-	else if (isSigTuple(sig,&i,ls)) 			visitTuple(sig,i,ls); 
-		
-	else if (isSigTupleAccess(sig,s1,s2)) 		visitTupleAccess(sig,s1,s2); 		
-		
-	
-	//----------------------------                                               
-				
-	else 										visitError(sig);
-}
-
-void sigvisitor::visitError(Tree sig)
-{
-	cerr << "ERROR visiting signal" << endl;
-}