Mercurial > octave-libgccjit
comparison src/file-io.cc @ 2926:66ef74ee5d9f
[project @ 1997-05-05 03:20:52 by jwe]
author | jwe |
---|---|
date | Mon, 05 May 1997 03:40:21 +0000 |
parents | c5b7a019b9ed |
children | 87cb7614257d |
comparison
equal
deleted
inserted
replaced
2925:f0665dac8e33 | 2926:66ef74ee5d9f |
---|---|
47 #include <sys/types.h> | 47 #include <sys/types.h> |
48 #endif | 48 #endif |
49 #include <unistd.h> | 49 #include <unistd.h> |
50 #endif | 50 #endif |
51 | 51 |
52 #include "file-ops.h" | |
53 | |
52 #include "defun.h" | 54 #include "defun.h" |
53 #include "error.h" | 55 #include "error.h" |
54 #include "file-ops.h" | |
55 #include "help.h" | 56 #include "help.h" |
56 #include "lo-ieee.h" | 57 #include "lo-ieee.h" |
57 #include "oct-fstrm.h" | 58 #include "oct-fstrm.h" |
58 #include "oct-iostrm.h" | 59 #include "oct-iostrm.h" |
59 #include "oct-map.h" | 60 #include "oct-map.h" |
1277 Return unique temporary file name.") | 1278 Return unique temporary file name.") |
1278 { | 1279 { |
1279 octave_value retval; | 1280 octave_value retval; |
1280 | 1281 |
1281 if (args.length () == 0) | 1282 if (args.length () == 0) |
1282 retval = oct_tempnam (); | 1283 retval = file_ops::tempnam (); |
1283 else | 1284 else |
1284 print_usage ("tmpnam"); | 1285 print_usage ("tmpnam"); |
1285 | 1286 |
1286 return retval; | 1287 return retval; |
1287 } | 1288 } |
1351 else | 1352 else |
1352 { | 1353 { |
1353 int oct_mask = convert (mask, 8, 10); | 1354 int oct_mask = convert (mask, 8, 10); |
1354 | 1355 |
1355 if (! error_state) | 1356 if (! error_state) |
1356 status = convert (oct_umask (oct_mask), 10, 8); | 1357 status = convert (file_ops::umask (oct_mask), 10, 8); |
1357 } | 1358 } |
1358 } | 1359 } |
1359 } | 1360 } |
1360 else | 1361 else |
1361 print_usage ("umask"); | 1362 print_usage ("umask"); |