Update of /cvsroot/compbench/CompBenchmarks++/libcompbenchmarks/CEL
In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv29100
Modified Files:
CEL-Array.cpp
Log Message:
Arrays are always global.
Index: CEL-Array.cpp
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/libcompbenchmarks/CEL/CEL-Array.cpp,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** CEL-Array.cpp 11 Mar 2007 18:47:48 -0000 1.3
--- CEL-Array.cpp 13 Mar 2007 20:31:31 -0000 1.4
***************
*** 44,48 ****
name=N->Evaluate();
! varOwner()->ArrayDef(name);
return("1");
}
--- 44,48 ----
name=N->Evaluate();
! varOwner(1)->ArrayDef(name);
return("1");
}
***************
*** 81,85 ****
value=V->Evaluate();
! varOwner()->ArrayAdd(name, value);
return("1");
--- 81,85 ----
value=V->Evaluate();
! varOwner(1)->ArrayAdd(name, value);
return("1");
***************
*** 113,117 ****
name=N->Evaluate();
! return(varOwner()->ArraySize(name));
}
--- 113,117 ----
name=N->Evaluate();
! return(varOwner(1)->ArraySize(name));
}
***************
*** 145,149 ****
is=I->Evaluate();
! return(varOwner()->ArrayGet(N->Evaluate(),
is));
}
--- 145,149 ----
is=I->Evaluate();
! return(varOwner(1)->ArrayGet(N->Evaluate(),
is));
}
***************
*** 174,178 ****
N=childs[0];
! return(varOwner()->ArrayUndef(N->Evaluate()));
}
--- 174,178 ----
N=childs[0];
! return(varOwner(1)->ArrayUndef(N->Evaluate()));
}
|