diff options
| author | Stas Boukarev <stassats@gmail.com> | 2024-09-30 22:27:05 +0300 |
|---|---|---|
| committer | Stas Boukarev <stassats@gmail.com> | 2024-09-30 22:27:05 +0300 |
| commit | f979e2c60d6cfe01d4d5e63096735fe20d510838 (patch) | |
| tree | 0e7b0343013b99100fba5b3f262a126e4cde2762 | |
| parent | 62f236087184542e4a451c36461acbda4c48d6e1 (diff) | |
sb-posix:fork is the interface, calling fork() directly will just
crash with multiple threads.
| -rw-r--r-- | contrib/sb-posix/interface.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/sb-posix/interface.lisp b/contrib/sb-posix/interface.lisp index 0e6da5440..a56b19761 100644 --- a/contrib/sb-posix/interface.lisp +++ b/contrib/sb-posix/interface.lisp @@ -356,7 +356,7 @@ ;; FIXME this is a lie, of course this can fail, but there's no ;; error handling here yet! - (define-call ("posix_fork" :c-name "fork") pid-t minusp) + (define-call-internally posix-fork "fork" pid-t minusp) (defun fork () "Forks the current process, returning 0 in the new process and the PID of the child process in the parent. Forking while multiple threads are running is |