Fixed some edge cases

1 files changed, 5 insertions, 4 deletions

diff --git a/data_structures/CBLOCK.js b/data_structures/CBLOCK.js
index 791c08f..77eb431 100644
--- a/data_structures/CBLOCK.js
+++ b/data_structures/CBLOCK.js
@@ -1,7 +1,7 @@
 function CBLOCK () {
 
 
-	var in = 1;
+	var in1 = 1;
 
 	var out = 1;
 
@@ -26,8 +26,8 @@ function CBLOCK () {
 	var ng = 0;
 
 	var model = scicos_model();
-	model.sim=list(" ",2004);
-	model.in=new ScilabDouble([in]);
+	model.sim=list(new ScilabString([" "]),new ScilabDouble([2004]));
+	model.in1.push(new ScilabDouble([in1]));
 	model.out=new ScilabDouble([out]);
 	model.evtin=clkin;
 	model.evtout=clkout;
@@ -40,8 +40,9 @@ function CBLOCK () {
 	model.dep_ut = new ScilabBoolean([true,false]);
 	model.nzcross=new ScilabDouble([ng]);
 
-	var label = [list([funam,"n",sci2exp(in),sci2exp(out),sci2exp(clkin),sci2exp(clkout),sci2exp(x0),sci2exp(0),sci2exp(z0),sci2exp(rpar),sci2exp(ipar),sci2exp(auto),"y","n"]',[])];
+	var label = list([funam,"n",sci2exp(in1),sci2exp(out),sci2exp(clkin),sci2exp(clkout),sci2exp(x0),sci2exp(0),sci2exp(z0),sci2exp(rpar),sci2exp(ipar),sci2exp(auto),"y","n"]',[]);
 
 	var gr_i = [];
 	this.x=new standard_define(new ScilabDouble([4,2]),model,label,gr_i);
+	return new BasicBlock(this.x)
 }