00001 #include "stack-c.h" 00002 00003 /***************************************** 00004 * Accessing the Scilab Stack 00005 * Creation of a Scilab variable Str of type string 00006 * from a name and an a C string 00007 *****************************************/ 00008 00009 int intex16c(fname) 00010 char* fname; 00011 { 00012 static int minlhs=1, minrhs=0, maxlhs=1, maxrhs=0; 00013 static char str[] ="Pilgrim said he, where can it be this land of Eldorado"; 00014 int strl; 00015 00016 CheckRhs(minrhs,maxrhs) ; 00017 CheckLhs(minlhs,maxlhs) ; 00018 00019 strl=strlen(str); 00020 /* Creating the Scilab variable Str from str */ 00021 WriteString("Str", &strl, str); 00022 00023 /* No output */ 00024 LhsVar(1) = 0; 00025 return(0); 00026 } 00027 00028
1.5.1