diff options
author | nutricato | 2009-07-07 14:41:59 +0000 |
---|---|---|
committer | nutricato | 2009-07-07 14:41:59 +0000 |
commit | 0b992f0195b8d0abe9f74ac3d9294d1b1c14c44b (patch) | |
tree | 8987ca0c33af5eabaea9bd5f317413557c617954 /tests/unit_tests/test200_malloc | |
parent | a484e92e9ca595b25036c11d6b259ba98ee1765c (diff) | |
download | scilab2c-0b992f0195b8d0abe9f74ac3d9294d1b1c14c44b.tar.gz scilab2c-0b992f0195b8d0abe9f74ac3d9294d1b1c14c44b.tar.bz2 scilab2c-0b992f0195b8d0abe9f74ac3d9294d1b1c14c44b.zip |
Diffstat (limited to 'tests/unit_tests/test200_malloc')
3 files changed, 39 insertions, 0 deletions
diff --git a/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci b/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci new file mode 100644 index 00000000..c56da083 --- /dev/null +++ b/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci @@ -0,0 +1,17 @@ +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function mainfunction()
+
+N = 2;
+B = myinit(N+4-2,2);
+disp('B')
+disp(B)
+
+N = 4;
+C = myinit(N,3);
+disp('C')
+disp(C)
+
+D=B+2.*C;
+disp('D')
+disp(D)
+endfunction
diff --git a/tests/unit_tests/test200_malloc/scilabcode/myinit.sci b/tests/unit_tests/test200_malloc/scilabcode/myinit.sci new file mode 100644 index 00000000..76cdef88 --- /dev/null +++ b/tests/unit_tests/test200_malloc/scilabcode/myinit.sci @@ -0,0 +1,12 @@ +//SCI2C: NIN= 2 +//SCI2C: NOUT= 1 +//SCI2C: OUT(1).TP= IN(1).TP +//SCI2C: OUT(1).SZ(1)= IN(1).VAL +//SCI2C: OUT(1).SZ(2)= IN(1).VAL +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function out = myinit(n,m)
+
+out1 = m+ones(n,n); +out = out1+2*ones(n,n); + +endfunction
diff --git a/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci b/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci new file mode 100644 index 00000000..916b0b82 --- /dev/null +++ b/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci @@ -0,0 +1,10 @@ +//SCI2C: NIN= 1 +//SCI2C: NOUT= 1 +//SCI2C: OUT(1).TP= IN(1).TP +//SCI2C: OUT(1).SZ(1)= IN(1).SZ(1) +//SCI2C: OUT(1).SZ(2)= IN(1).SZ(2) +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function out = myzeros(in)
+
+out = 3+zeros(in); +endfunction
|