Fix test after commit https://codereview.scilab.org/#/c/10467/ (Fixes bug #5291). 80/10580/2
Vincent COUVERT [Fri, 22 Feb 2013 14:06:29 +0000 (15:06 +0100)]
To test: test_run("string", "strtod")

Change-Id: I3de5ecbbb56359ee71620d41e09fc3f8536c5da8

scilab/modules/string/tests/unit_tests/strtod.dia.ref
scilab/modules/string/tests/unit_tests/strtod.tst

index 5f803e7..1d6aa49 100644 (file)
@@ -9,34 +9,34 @@
 // strtod
 //===============================
 N = 666.666;
-STREND = ' is a double';
+STREND = " is a double";
 STR = string(N)+STREND;
 d = strtod(STR);
-if d <> N then bugmes();quit;end
+assert_checkequal(d, N);
 [d,s] = strtod(STR);
-if d <> N bugmes();quit;end
-if s <> STREND then bugmes();quit;end
+assert_checkequal(d, N);
+assert_checkequal(s, STREND);
 //===============================
-STR ='1';
+STR = "1";
 [d,s] = strtod(STR);
-if s<>'' then bugmes();quit;end
-if d<>1 then bugmes();quit;end
+assert_checkequal(s, "");
+assert_checkequal(d, 1);
 //===============================
-STR = 'string';
+STR = "string";
 [d,s] = strtod(STR);
-if s<>STR then bugmes();quit;end
-if d<>0 then bugmes();quit;end
+assert_checkequal(s, STR);
+assert_checkequal(d, %nan);
 //===============================
-STR1 = '1A';
-STR2 = '2B';
-STR3 = '3C';
-STR4 = '4d';
+STR1 = "1A";
+STR2 = "2B";
+STR3 = "3C";
+STR4 = "4d";
 STR = [STR1,STR2;STR3,STR4];
 [d,s] = strtod(STR);
-if s<>['A','B';'C','d'] then bugmes();quit;end
-if d<>[1,2;3,4] then bugmes();quit;end
+assert_checkequal(s, ["A","B";"C","d"]);
+assert_checkequal(d, [1,2;3,4]);
 //===============================
-[d,s] = strtod('');
-if s<>'' then bugmes();quit;end
-if d<>0 then bugmes();quit;end
+[d,s] = strtod("");
+assert_checkequal(s, "");
+assert_checkequal(d, 0);
 //===============================
index 74f3d47..787d18d 100644 (file)
 // strtod
 //===============================
 N = 666.666;
-STREND = ' is a double';
+STREND = " is a double";
 STR = string(N)+STREND;
 d = strtod(STR);
-if d <> N then pause,end
+assert_checkequal(d, N);
 [d,s] = strtod(STR);
-if d <> N pause,end
-if s <> STREND then pause,end
+assert_checkequal(d, N);
+assert_checkequal(s, STREND);
 //===============================
-STR ='1';
+STR = "1";
 [d,s] = strtod(STR);
-if s<>'' then pause,end
-if d<>1 then pause,end
+assert_checkequal(s, "");
+assert_checkequal(d, 1);
 //===============================
-STR = 'string';
+STR = "string";
 [d,s] = strtod(STR);
-if s<>STR then pause,end
-if d<>0 then pause,end
+assert_checkequal(s, STR);
+assert_checkequal(d, %nan);
 //===============================
-STR1 = '1A';
-STR2 = '2B';
-STR3 = '3C';
-STR4 = '4d';
+STR1 = "1A";
+STR2 = "2B";
+STR3 = "3C";
+STR4 = "4d";
 STR = [STR1,STR2;STR3,STR4];
 [d,s] = strtod(STR);
-if s<>['A','B';'C','d'] then pause,end
-if d<>[1,2;3,4] then pause,end
+assert_checkequal(s, ["A","B";"C","d"]);
+assert_checkequal(d, [1,2;3,4]);
 //===============================
-[d,s] = strtod('');
-if s<>'' then pause,end
-if d<>0 then pause,end
+[d,s] = strtod("");
+assert_checkequal(s, "");
+assert_checkequal(d, 0);
 //===============================
\ No newline at end of file