make exprs an array by default

8 files changed, 10 insertions, 10 deletions

diff --git a/js/Sources/CLKINV_f.js b/js/Sources/CLKINV_f.js
index 95cfa7d5..b6ef32a8 100644
--- a/js/Sources/CLKINV_f.js
+++ b/js/Sources/CLKINV_f.js
@@ -7,7 +7,7 @@ x=arg1;
 graphics=arg1.graphics;
 model=arg1.model;
 exprs=graphics.exprs;
-exprs=exprs(1);
+exprs=exprs[1-1];
 while (true) {
 [ok,prt,exprs]=scicos_getvalue([msprintf(gettext("Set %s block parameters"),"CLKINV_f")," ",gettext("Event input port")," "],"Port Number",list("vec",1),exprs);
 prt=int(prt);
diff --git a/js/Sources/CLKIN_f.js b/js/Sources/CLKIN_f.js
index b740b93c..274772ad 100644
--- a/js/Sources/CLKIN_f.js
+++ b/js/Sources/CLKIN_f.js
@@ -7,7 +7,7 @@ x=arg1;
 graphics=arg1.graphics;
 model=arg1.model;
 exprs=graphics.exprs;
-exprs=exprs(1);
+exprs=exprs[1-1];
 while (true) {
 [ok,prt,exprs]=scicos_getvalue("Set Event Input block parameters","Port number",list("vec",1),exprs);
 prt=int(prt);
diff --git a/js/Sources/GENSQR_f.js b/js/Sources/GENSQR_f.js
index f8f70525..3766c73b 100644
--- a/js/Sources/GENSQR_f.js
+++ b/js/Sources/GENSQR_f.js
@@ -8,7 +8,7 @@ graphics=arg1.graphics;
 exprs=graphics.exprs;
 model=arg1.model;
 if (size(exprs,"*")==2) {
-exprs=exprs(2);
+exprs=exprs[2-1];
 }
 while (true) {
 [ok,Amplitude,exprs]=scicos_getvalue(["Set Square generator block parameters"],["Amplitude"],list("vec",1),exprs);
diff --git a/js/Sources/INIMPL_f.js b/js/Sources/INIMPL_f.js
index c6afca25..26990047 100644
--- a/js/Sources/INIMPL_f.js
+++ b/js/Sources/INIMPL_f.js
@@ -8,7 +8,7 @@ graphics=arg1.graphics;
 exprs=graphics.exprs;
 model=arg1.model;
 if (size(exprs,"*")==2) {
-exprs=exprs(1);
+exprs=exprs[1-1];
 }
 while (true) {
 [ok,prt,exprs]=scicos_getvalue([msprintf(gettext("Set %s block parameters"),"INIMPL_f")," ",gettext("Implicit input port")," "],"Port Number",list("vec",1),exprs);
diff --git a/js/Sources/IN_f.js b/js/Sources/IN_f.js
index d9ca87b1..2099e960 100644
--- a/js/Sources/IN_f.js
+++ b/js/Sources/IN_f.js
@@ -8,10 +8,10 @@ graphics=arg1.graphics;
 model=arg1.model;
 exprs=graphics.exprs;
 if (size(exprs,"*")==2) {
-exprs=exprs(1);
+exprs=exprs[1-1];
 }
 if (size(exprs,"*")==1) {
-exprs=[exprs(1),"[-1 -2]","-1"];
+exprs=[exprs[1-1],"[-1 -2]","-1"];
 }
 while (true) {
 [ok,prt,otsz,ot,exprs]=getvalue(_("Set Input block parameters"),[_("Port number"),_("Outport size ([-1 -2] for inherit)"),_("Outport Type (-1 for inherit)")],list("vec",1,"vec",-1,"vec",1),exprs);
diff --git a/js/Sources/READAU_f.js b/js/Sources/READAU_f.js
index 365f072e..0cfdba51 100644
--- a/js/Sources/READAU_f.js
+++ b/js/Sources/READAU_f.js
@@ -13,7 +13,7 @@ ipar=model.ipar;
 imask=9+ipar(1);
 tmask=ipar(imask);
 lunit=dstate(3);
-fname=exprs(1);
+fname=exprs[1-1];
 while (true) {
 [ok,fname1,N,swap,exprs]=scicos_getvalue([msprintf(gettext("Set %s block parameters"),"READAU_f")," ",gettext("(Read Audio File)")," ",gettext("Read is done on a binary \'.au\' file")],[gettext("Input File Name"),gettext("Buffer size"),gettext("Swap Mode (0:No, 1:Yes)")],list("str",1,"vec",1,"vec",1),exprs);
 tmask1=[];
diff --git a/js/Sources/READC_f.js b/js/Sources/READC_f.js
index aeff85c7..a5524672 100644
--- a/js/Sources/READC_f.js
+++ b/js/Sources/READC_f.js
@@ -13,8 +13,8 @@ ipar=model.ipar;
 imask=9+ipar(1);
 tmask=ipar(imask);
 lunit=dstate(3);
-fname=exprs(3);
-frmt=exprs(4);
+fname=exprs[3-1];
+frmt=exprs[4-1];
 while (true) {
 [ok,tmask1,outmask,fname1,frmt1,M,N,offset,swap,exprs]=scicos_getvalue([msprintf(gettext("Set %s block parameters"),"READC_f")," ",gettext("Read from C binary file")],[gettext("Time Record Selection"),gettext("Outputs Record Selection"),gettext("Input File Name"),gettext("Input Format"),gettext("Record Size"),gettext("Buffer Size"),gettext("Initial Record Index"),gettext("Swap Mode (0:No, 1:Yes)")],list("vec",-1,"vec",-1,"str",1,"str",1,"vec",1,"vec",1,"vec",1,"vec",1),exprs);
 if (!ok) {
diff --git a/js/Sources/RFILE_f.js b/js/Sources/RFILE_f.js
index 2b2ac0f6..265cc7f6 100644
--- a/js/Sources/RFILE_f.js
+++ b/js/Sources/RFILE_f.js
@@ -1,3 +1,3 @@
-Syntax error in input LexToken(EOL,'\n                ',1,4018)
+Syntax error in input LexToken(SPACE,' ',1,5989)
 /* autogenerated from "macros/Sources/RFILE_f.sci" */
 None