Mercurial > hg > octave-nkf

comparison src/file-io.cc @ 1773:5215571ea783

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-01-23 08:10:26 by jwe]
author jwe
date Tue, 23 Jan 1996 08:11:08 +0000
parents e8e76be43e79
children 1881b2a7d1e2
comparison
equal deleted inserted replaced
1772:95c4c5705909 1773:5215571ea783
2343 return retval; 2343 return retval;
2344 } 2344 }
2345 2345
2346 long mode = (long) args(1).double_value (); 2346 long mode = (long) args(1).double_value ();
2347 2347
2348 retval (0) = (double) xmkfifo (name, mode); 2348 retval (0) = (double) oct_mkfifo (name, mode);
2349 2349
2350 return retval; 2350 return retval;
2351 } 2351 }
2352 2352
2353 DEFUN ("mkfifo", Fmkfifo, Smkfifo, 10, 2353 DEFUN ("mkfifo", Fmkfifo, Smkfifo, 10,
2384 return retval; 2384 return retval;
2385 } 2385 }
2386 2386
2387 string name = args(0).string_value (); 2387 string name = args(0).string_value ();
2388 2388
2389 retval (0) = (double) unlink (name.c_str ()); 2389 retval (0) = (double) oct_unlink (name);
2390 2390
2391 return retval; 2391 return retval;
2392 } 2392 }
2393 2393
2394 DEFUN ("unlink", Funlink, Sunlink, 10, 2394 DEFUN ("unlink", Funlink, Sunlink, 10,
2576 else 2576 else
2577 { 2577 {
2578 int oct_mask = convert (mask, 8, 10); 2578 int oct_mask = convert (mask, 8, 10);
2579 2579
2580 if (! error_state) 2580 if (! error_state)
2581 status = convert (xumask (oct_mask), 10, 8); 2581 status = convert (oct_umask (oct_mask), 10, 8);
2582 } 2582 }
2583 } 2583 }
2584 } 2584 }
2585 else 2585 else
2586 print_usage ("umask"); 2586 print_usage ("umask");