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);