//
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2010-2010 - DIGITEO - Bruno JOFRET
//
// This file must be used under the terms of the CeCILL.
// This source file is licensed as described in the file COPYING, which
// you should have received as part of this distribution. The terms
// are also available at
// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
//
//
// <-- ENGLISH IMPOSED -->
// <-- JVM NOT MANDATORY -->
global SCI2CHOME;
scilab2c(SCI2CHOME+"/tests/unit_tests/double/test_Length.sci", TMPDIR);
-----------------------------------
--- Executing your SCILAB code. ---
-----------------------------------
1.
1.
6.
6.
1.
1.
6.
6.
5.
1.
5.
1.
------------------------------------------
--- End Execution of your SCILAB code. ---
------------------------------------------
==> SCI2C hArtes/POLIBA Tool!!!
Removing directory: TMPDIR/SCI2CTmpResultsReports
Removing directory: TMPDIR
==> Initialize SCI2C and USER2C Libraries.
==> Load SCI2C and USER2C Libraries.
==> Start translation of function "test_Length"
Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_Length/test_Length_copy.sci' already opened in Scilab.
Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_Length/test_Length_copy.sci' already opened in Scilab.
==> Generate the AST.
==> Generate C code in TMPDIR/main.c
/*SCI2C: ##########################################################
########
SCI2C: disp(length(4));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(2+3*%i));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length([1 2 3 ; 4 5 6]));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length([1 2 3 ; 4 5 6]*%i));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: e = %pi ;
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(e)); // d0Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: f = e * %i;
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(f));// z0Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: a = [1 2 3 ; 4 5 6];
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(a));// d2Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: b = [1 2 3 ; 4 5 6] * %i;
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(b));// z2Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: g = "pouet" ;
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: h = "a" ;
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(g)); // g0Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length(h)); // g2Lengthd0
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length("pouet"));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(length("a"));
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: endfunction
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
==> Copying sources
==> Copying headers
==> Copying interfaces
==> Generating Builder TMPDIR/Makefile
==> Translation Successfully Completed!!!
fd = mopen(TMPDIR+"/main.c");
mgetl(fd)
ans =
!/* !
! !
!** ************************************************ !
! !
!** This file has been generated using !
! !
!** Scilab2C (Version 2.0) !
! !
!** !
! !
!** Please visit following links for more informations: !
! !
!** Atoms Module: http://atoms.scilab.org/toolboxes/scilab2c !
! !
!** Scilab2C Forge: http://forge.scilab.org/index.php/p/scilab2c/ !
! !
!** Scilab2C ML: http://forge.scilab.org/index.php/p/scilab2c/ !
! !
!** ************************************************ !
! !
!*/ !
! !
! !
! !
! !
! !
!/* !
! !
!** ----------------- !
! !
!** --- Includes. --- !
! !
!** ----------------- !
! !
!*/ !
! !
!#include "main.h" !
! !
!/* !
! !
!** --------------------- !
! !
!** --- End Includes. --- !
! !
!** --------------------- !
! !
!*/ !
! !
! !
! !
! !
! !
! !
! !
!/* !
! !
!** ------------------------------------- !
! !
!** --- Global Variables Declaration. --- !
! !
!** ------------------------------------- !
! !
!*/ !
! !
! !
! !
! !
! !
!/* !
! !
!** ----------------------------------------- !
! !
!** --- End Global Variables Declaration. --- !
! !
!** ----------------------------------------- !
! !
!*/ !
! !
! !
! !
!/* !
! !
! SCI2C: -------------------------------------------------------------!
! ----- !
! !
! SCI2C: function test_Length() !
! !
! SCI2C: -------------------------------------------------------------!
! ----- !
! !
!*/ !
! !
!int main() !
! !
!{ !
! !
!/* !
! !
!** ----------------------------- !
! !
!** --- Variable Declaration. --- !
! !
!** ----------------------------- !
! !
!*/ !
! !
! !
! !
! double __temp1; !
! !
! !
! !
! double ans1; !
! !
! !
! !
! doubleComplex __temp2; !
! !
! !
! !
! doubleComplex __temp3; !
! !
! !
! !
! double __temp4; !
! !
! !
! !
! double ans2; !
! !
! !
! !
! double __temp5[1 * 2]; !
! !
! int ____temp5Size[2] = {1, 2};; !
! !
! !
! !
! double __temp6[1 * 3]; !
! !
! int ____temp6Size[2] = {1, 3};; !
! !
! !
! !
! double __temp7[1 * 2]; !
! !
! int ____temp7Size[2] = {1, 2};; !
! !
! !
! !
! double __temp8[1 * 3]; !
! !
! int ____temp8Size[2] = {1, 3};; !
! !
! !
! !
! double __temp9[2 * 3]; !
! !
! int ____temp9Size[2] = {2, 3};; !
! !
! !
! !
! double __temp10; !
! !
! !
! !
! double ans3; !
! !
! !
! !
! double __temp11[1 * 2]; !
! !
! int ____temp11Size[2] = {1, 2};; !
! !
! !
! !
! double __temp12[1 * 3]; !
! !
! int ____temp12Size[2] = {1, 3};; !
! !
! !
! !
! double __temp13[1 * 2]; !
! !
! int ____temp13Size[2] = {1, 2};; !
! !
! !
! !
! double __temp14[1 * 3]; !
! !
! int ____temp14Size[2] = {1, 3};; !
! !
! !
! !
! double __temp15[2 * 3]; !
! !
! int ____temp15Size[2] = {2, 3};; !
! !
! !
! !
! doubleComplex __temp16[2 * 3]; !
! !
! int ____temp16Size[2] = {2, 3};; !
! !
! !
! !
! double __temp17; !
! !
! !
! !
! double ans4; !
! !
! !
! !
! double e = 3.1415927; !
! !
! !
! !
! double __temp18; !
! !
! !
! !
! double ans5; !
! !
! !
! !
! doubleComplex f; !
! !
! !
! !
! double __temp19; !
! !
! !
! !
! double ans6; !
! !
! !
! !
! double __temp20[1 * 2]; !
! !
! int ____temp20Size[2] = {1, 2};; !
! !
! !
! !
! double __temp21[1 * 3]; !
! !
! int ____temp21Size[2] = {1, 3};; !
! !
! !
! !
! double __temp22[1 * 2]; !
! !
! int ____temp22Size[2] = {1, 2};; !
! !
! !
! !
! double __temp23[1 * 3]; !
! !
! int ____temp23Size[2] = {1, 3};; !
! !
! !
! !
! double a[2 * 3]; !
! !
! int __aSize[2] = {2, 3};; !
! !
! !
! !
! double __temp24; !
! !
! !
! !
! double ans7; !
! !
! !
! !
! double __temp25[1 * 2]; !
! !
! int ____temp25Size[2] = {1, 2};; !
! !
! !
! !
! double __temp26[1 * 3]; !
! !
! int ____temp26Size[2] = {1, 3};; !
! !
! !
! !
! double __temp27[1 * 2]; !
! !
! int ____temp27Size[2] = {1, 2};; !
! !
! !
! !
! double __temp28[1 * 3]; !
! !
! int ____temp28Size[2] = {1, 3};; !
! !
! !
! !
! double __temp29[2 * 3]; !
! !
! int ____temp29Size[2] = {2, 3};; !
! !
! !
! !
! doubleComplex b[2 * 3]; !
! !
! int __bSize[2] = {2, 3};; !
! !
! !
! !
! double __temp30; !
! !
! !
! !
! double ans8; !
! !
! !
! !
! char __temp31[1*6] = {"pouet"}; !
! !
! int ____temp31Size[2] = {1,6}; !
! !
! !
! !
! char g[1*6] = {"pouet"}; !
! !
! int __gSize[2] = {1,6}; !
! !
! !
! !
! char __temp32[1*2] = {"a"}; !
! !
! int ____temp32Size[2] = {1,2}; !
! !
! !
! !
! char h[1*2] = {"a"}; !
! !
! int __hSize[2] = {1,2}; !
! !
! !
! !
! double __temp33; !
! !
! !
! !
! double ans9; !
! !
! !
! !
! double __temp34; !
! !
! !
! !
! double ans10; !
! !
! !
! !
! char __temp35[1*6] = {"pouet"}; !
! !
! int ____temp35Size[2] = {1,6}; !
! !
! !
! !
! double __temp36; !
! !
! !
! !
! double ans11; !
! !
! !
! !
! char __temp37[1*2] = {"a"}; !
! !
! int ____temp37Size[2] = {1,2}; !
! !
! !
! !
! double __temp38; !
! !
! !
! !
! double ans12; !
! !
! !
! !
! !
! !
! !
! !
! !
! !
!/* !
! !
!** --------------------------------- !
! !
!** --- End Variable Declaration. --- !
! !
!** --------------------------------- !
! !
!*/ !
! !
!/* !
! !
!** --------------- !
! !
!** --- C code. --- !
! !
!** --------------- !
! !
!*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(4)); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp1 = d0lengthd0(4); !
! !
! ans1 = d0dispd0(__temp1); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(2+3*%i)); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp2 = d0z0OpStarz0(3,DoubleComplex(0,1)); !
! !
! __temp3 = d0z0OpPlusz0(2,__temp2); !
! !
! __temp4 = z0lengthd0(__temp3); !
! !
! ans2 = d0dispd0(__temp4); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length([1 2 3 ; 4 5 6])); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0OpRcd2(1,2,__temp5); !
! !
! d2d0OpRcd2(__temp5, ____temp5Size,3,__temp6); !
! !
! d0d0OpRcd2(4,5,__temp7); !
! !
! d2d0OpRcd2(__temp7, ____temp7Size,6,__temp8); !
! !
! d2d2OpCcd2(__temp6, ____temp6Size,__temp8, ____temp8Size,__temp9)!
! ; !
! !
! __temp10 = d2lengthd0(__temp9, ____temp9Size); !
! !
! ans3 = d0dispd0(__temp10); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length([1 2 3 ; 4 5 6]*%i)); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0OpRcd2(1,2,__temp11); !
! !
! d2d0OpRcd2(__temp11, ____temp11Size,3,__temp12); !
! !
! d0d0OpRcd2(4,5,__temp13); !
! !
! d2d0OpRcd2(__temp13, ____temp13Size,6,__temp14); !
! !
! d2d2OpCcd2(__temp12, ____temp12Size,__temp14, ____temp14Size,__te!
! mp15); !
! !
! d2z0OpStarz2(__temp15, ____temp15Size,DoubleComplex(0,1),__temp16)!
! ; !
! !
! __temp17 = z2lengthd0(__temp16, ____temp16Size); !
! !
! ans4 = d0dispd0(__temp17); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: e = %pi ; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! e = d0OpEquald0(SCI2C_PI); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(e)); // d0Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp18 = d0lengthd0(e); !
! !
! ans5 = d0dispd0(__temp18); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: f = e * %i; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! f = d0z0OpStarz0(e,DoubleComplex(0,1)); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(f));// z0Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp19 = z0lengthd0(f); !
! !
! ans6 = d0dispd0(__temp19); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: a = [1 2 3 ; 4 5 6]; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0OpRcd2(1,2,__temp20); !
! !
! d2d0OpRcd2(__temp20, ____temp20Size,3,__temp21); !
! !
! d0d0OpRcd2(4,5,__temp22); !
! !
! d2d0OpRcd2(__temp22, ____temp22Size,6,__temp23); !
! !
! d2d2OpCcd2(__temp21, ____temp21Size,__temp23, ____temp23Size,a); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(a));// d2Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp24 = d2lengthd0(a, __aSize); !
! !
! ans7 = d0dispd0(__temp24); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: b = [1 2 3 ; 4 5 6] * %i; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0OpRcd2(1,2,__temp25); !
! !
! d2d0OpRcd2(__temp25, ____temp25Size,3,__temp26); !
! !
! d0d0OpRcd2(4,5,__temp27); !
! !
! d2d0OpRcd2(__temp27, ____temp27Size,6,__temp28); !
! !
! d2d2OpCcd2(__temp26, ____temp26Size,__temp28, ____temp28Size,__te!
! mp29); !
! !
! d2z0OpStarz2(__temp29, ____temp29Size,DoubleComplex(0,1),b); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(b));// z2Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp30 = z2lengthd0(b, __bSize); !
! !
! ans8 = d0dispd0(__temp30); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: g = "pouet" ; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! g2OpEqualg2(__temp31, ____temp31Size,g); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: h = "a" ; !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! g2OpEqualg2(__temp32, ____temp32Size,h); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(g)); // g0Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp33 = g2lengthd0(g, __gSize); !
! !
! ans9 = d0dispd0(__temp33); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length(h)); // g2Lengthd0 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp34 = g2lengthd0(h, __hSize); !
! !
! ans10 = d0dispd0(__temp34); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length("pouet")); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp36 = g2lengthd0(__temp35, ____temp35Size); !
! !
! ans11 = d0dispd0(__temp36); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(length("a")); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! __temp38 = g2lengthd0(__temp37, ____temp37Size); !
! !
! ans12 = d0dispd0(__temp38); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: endfunction !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /* !
! !
! ** --------------------- !
! !
! ** --- Free Section. --- !
! !
! ** --------------------- !
! !
! */ !
! !
! /* !
! !
! ** ------------------------- !
! !
! ** --- End Free Section. --- !
! !
! ** ------------------------- !
! !
! */ !
! !
! !
! !
! return(0); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
!} !
! !
! !
mclose(fd);