loadlib fixed about path file
[scilab.git] / scilab / modules / functions / tests / nonreg_tests / bug_6549.dia.ref
index b2712e8..cc36eab 100644 (file)
@@ -12,6 +12,7 @@
 // <-- Short Description -->
 // genlib function had a behavior which was not consistent with the load function.
 // =============================================================================
+// <-- CLI SHELL MODE -->
 f = [
 "function titi()"
 "  disp(''titi'');"
@@ -27,52 +28,37 @@ f = [
 ""
 ];
 cd TMPDIR;
-mkdir('bug_6549');
-cd('bug_6549'); 
-mputl(f,'toto.sci');
-if genlib('bug_6549lib',TMPDIR + '/bug_6549') <> %t then bugmes();quit;end;
+mkdir("bug_6549");
+cd("bug_6549");
+mputl(f,"toto.sci");
+if genlib("bug_6549lib",TMPDIR + "/bug_6549") <> %t then bugmes();quit;end;
 // =============================================================================
-ierr = execstr('toto','errcatch');
- toto   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('titi','errcatch');
- titi   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('tata','errcatch');
- tata   
+ierr = execstr("toto","errcatch");
+ toto
 if ierr <> 0 then bugmes();quit;end
+ierr = execstr("titi","errcatch");
+if ierr == 0 then bugmes();quit;end
+ierr = execstr("tata","errcatch");
+if ierr == 0 then bugmes();quit;end
 clear bug_6549lib titi toto tata ierr;
 // =============================================================================
-load(TMPDIR + '/bug_6549/lib');
-ierr = execstr('toto','errcatch');
- toto   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('titi','errcatch');
- titi   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('tata','errcatch');
- tata   
+load(TMPDIR + "/bug_6549/lib");
+ierr = execstr("toto","errcatch");
+ toto
 if ierr <> 0 then bugmes();quit;end
+ierr = execstr("titi","errcatch");
+if ierr == 0 then bugmes();quit;end
+ierr = execstr("tata","errcatch");
+if ierr == 0 then bugmes();quit;end
 clear bug_6549lib titi toto tata ierr;
 // =============================================================================
-bug_6549lib = lib(TMPDIR + '/bug_6549');
-ierr = execstr('toto','errcatch');
- toto   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('titi','errcatch');
- titi   
-if ierr <> 0 then bugmes();quit;end
-ierr = execstr('tata','errcatch');
- tata   
+bug_6549lib = lib(TMPDIR + "/bug_6549");
+ierr = execstr("toto","errcatch");
+ toto
 if ierr <> 0 then bugmes();quit;end
+ierr = execstr("titi","errcatch");
+if ierr == 0 then bugmes();quit;end
+ierr = execstr("tata","errcatch");
+if ierr == 0 then bugmes();quit;end
 clear bug_6549lib titi toto tata ierr;
 // =============================================================================