Mercurial > hg > octave-nkf
comparison src/pt-mat.cc @ 12842:a52b4e9f45e3
codesprint: new tests for pt-mat.cc
* pt-mat.cc (Fstring_fill_char): New tests.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sat, 16 Jul 2011 18:05:35 -0400 |
parents | 7a5aacf65f81 |
children | 213c791292a6 |
comparison
equal
deleted
inserted
replaced
12841:69c63a234b14 | 12842:a52b4e9f45e3 |
---|---|
1144 @end example\n\ | 1144 @end example\n\ |
1145 @end deftypefn") | 1145 @end deftypefn") |
1146 { | 1146 { |
1147 return SET_INTERNAL_VARIABLE (string_fill_char); | 1147 return SET_INTERNAL_VARIABLE (string_fill_char); |
1148 } | 1148 } |
1149 | |
1150 /* | |
1151 %!error (string_fill_char (1, 2)); | |
1152 %!test | |
1153 %! orig_val = string_fill_char (); | |
1154 %! old_val = string_fill_char ("X"); | |
1155 %! assert (orig_val, old_val); | |
1156 %! assert (string_fill_char (), "X"); | |
1157 %! assert (["these"; "are"; "strings"], ["theseXX"; "areXXXX"; "strings"]); | |
1158 %! string_fill_char (orig_val); | |
1159 %! assert (string_fill_char (), orig_val); | |
1160 */ |