* Bug #14375 fixed - Calling input function with a argument of 64 characters or more...
[scilab.git] / scilab / modules / console / tests / unit_tests / prompt.dia.ref
index e269884..ab15194 100644 (file)
@@ -7,16 +7,21 @@
 // <-- CLI SHELL MODE -->
 // =============================================================================
 curprompt = prompt();
-if curprompt <> ascii([45.    45.    62.]) then bugmes();quit;end
+if curprompt <> ascii([45.    45.    62.    32.]) then bugmes();quit;end
 [curprompt, pause_level] = prompt();
-if curprompt <> ascii([45.    45.    62.]) then bugmes();quit;end
-if pause_level <> 0 then bugmes();quit;end
-prompt('-- My Prompt -->');
--- My Prompt -->1+1;
-ierr = execstr('[a,b,c] = prompt();','errcatch');
-if ierr <> 78 then bugmes();quit;end
-ierr = execstr('[a,b] = prompt(1);','errcatch');
-if ierr <> 999 then bugmes();quit;end
-ierr = execstr('[a,b] = prompt(''1'');','errcatch');
-if ierr <> 999 then bugmes();quit;end
-// =============================================================================
+if curprompt <> ascii([45.    45.    62.    32.]) then bugmes();quit;end
+assert_checkequal(pause_level, 0);
+prompt("-- My Prompt -->");
+1+1;
+ierr = execstr("[a,b,c] = prompt();","errcatch");
+assert_checkequal(ierr, 999);
+ierr = execstr("[a,b] = prompt(1);","errcatch");
+assert_checkequal(ierr, 999);
+ierr = execstr("[a,b] = prompt(''1'');","errcatch");
+assert_checkequal(ierr, 999);
+ierr = execstr("prompt(""1234567890123456789012345678901234567890123456789012345678901234"");","errcatch");
+assert_checkequal(ierr, 999);
+ierr = execstr("prompt(""123456789012345678901234567890123456789012345678901234567890123"");","errcatch");
+assert_checkequal(ierr, 0);
+ierr = execstr("prompt(""这段文字很长这段文字很长这段文字很长这段文字很长这段文字很长"");", "errcatch");
+assert_checkequal(ierr, 999);