Mercurial > octave
comparison test/io.tst @ 31566:67bb53a137e1
maint: merge stable to default
author | Rik <rik@octave.org> |
---|---|
date | Sun, 27 Nov 2022 17:03:48 -0800 |
parents | 2f08a53e0a23 332a6ccac881 |
children | 5f11de0e7440 |
comparison
equal
deleted
inserted
replaced
31563:5744dac88986 | 31566:67bb53a137e1 |
---|---|
1207 %! w_modes = {"wb", "wt"}; | 1207 %! w_modes = {"wb", "wt"}; |
1208 %! r_modes = {"rb", "rt"}; | 1208 %! r_modes = {"rb", "rt"}; |
1209 %! f_texts = {"foo\nbar\nbaz\n", "foo\rbar\rbaz\r", "foo\r\nbar\r\nbaz\r\n"}; | 1209 %! f_texts = {"foo\nbar\nbaz\n", "foo\rbar\rbaz\r", "foo\r\nbar\r\nbaz\r\n"}; |
1210 %! for i = 1:numel (w_modes) | 1210 %! for i = 1:numel (w_modes) |
1211 %! w_mode = w_modes{i}; | 1211 %! w_mode = w_modes{i}; |
1212 %! for j = 1:numel (r_modes); | 1212 %! for j = 1:numel (r_modes) |
1213 %! r_mode = r_modes{j}; | 1213 %! r_mode = r_modes{j}; |
1214 %! for k = 1:numel (f_texts); | 1214 %! for k = 1:numel (f_texts) |
1215 %! f_text = f_texts{k}; | 1215 %! f_text = f_texts{k}; |
1216 %! fname = tempname (); | 1216 %! fname = tempname (); |
1217 %! fid = fopen (fname, w_mode); | 1217 %! fid = fopen (fname, w_mode); |
1218 %! unwind_protect | 1218 %! unwind_protect |
1219 %! fprintf (fid, "%s", f_text); | 1219 %! fprintf (fid, "%s", f_text); |