Mercurial > hg > octave-lyh
comparison scripts/strings/untabify.m @ 11115:965766039d93
finish adding untabify.m to build system
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 19 Oct 2010 02:22:20 -0400 |
parents | eab173e1e80c |
children | 564e998017f5 |
comparison
equal
deleted
inserted
replaced
11114:f7079e3b0227 | 11115:965766039d93 |
---|---|
37 ## fid = fopen ("tabbed_script.m"); | 37 ## fid = fopen ("tabbed_script.m"); |
38 ## text = char (fread (fid, "uchar")'); | 38 ## text = char (fread (fid, "uchar")'); |
39 ## fclose (fid); | 39 ## fclose (fid); |
40 ## fid = fopen ("untabified_script.m", "w"); | 40 ## fid = fopen ("untabified_script.m", "w"); |
41 ## text = untabify (strsplit (text, "\n"), 8, true); | 41 ## text = untabify (strsplit (text, "\n"), 8, true); |
42 ## fprintf (fid, "%s\n", text{:}); | 42 ## fprintf (fid, "%s\n", text@{:@}); |
43 ## fclose (fid); | 43 ## fclose (fid); |
44 ## @end group | 44 ## @end group |
45 ## @end example | 45 ## @end example |
46 ## | 46 ## |
47 ## @seealso{strjust, strsplit, deblank} | 47 ## @seealso{strjust, strsplit, deblank} |