Mercurial > hg > octave-avbm
comparison src/toplev.cc @ 4086:ddc722b38e87
[project @ 2002-10-03 19:08:45 by jwe]
author | jwe |
---|---|
date | Thu, 03 Oct 2002 19:08:45 +0000 |
parents | babc519f245b |
children | cbac6756967e |
comparison
equal
deleted
inserted
replaced
4085:ee4790097033 | 4086:ddc722b38e87 |
---|---|
495 | 495 |
496 octave_env::putenv ("TEXMFDBS", octave_original_texmfdbs); | 496 octave_env::putenv ("TEXMFDBS", octave_original_texmfdbs); |
497 | 497 |
498 if (type == async) | 498 if (type == async) |
499 { | 499 { |
500 #ifdef HAVE_FORK | |
500 pid_t pid = fork (); | 501 pid_t pid = fork (); |
501 | 502 |
502 if (pid < 0) | 503 if (pid < 0) |
503 error ("system: fork failed -- can't create child process"); | 504 error ("system: fork failed -- can't create child process"); |
504 else if (pid == 0) | 505 else if (pid == 0) |
510 | 511 |
511 panic_impossible (); | 512 panic_impossible (); |
512 } | 513 } |
513 else | 514 else |
514 retval(0) = static_cast<double> (pid); | 515 retval(0) = static_cast<double> (pid); |
516 #else | |
517 error ("asynchronous system calls are not supported"); | |
518 #endif | |
515 } | 519 } |
516 else if (return_output) | 520 else if (return_output) |
517 retval = run_command_and_return_output (cmd_str); | 521 retval = run_command_and_return_output (cmd_str); |
518 else | 522 else |
519 { | 523 { |