Skip to content

Commit

Permalink
Revert "system: make exit have ( n -- ) stack effect"
Browse files Browse the repository at this point in the history
This reverts commit 3c441d3.
  • Loading branch information
mrjbq7 committed Sep 1, 2023
1 parent b23423f commit f3660a3
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions core/system/system.factor
Original file line number Diff line number Diff line change
Expand Up @@ -82,7 +82,7 @@ PRIVATE>
vm-compiler % "] on " % os name>> %
] "" make ;

: exit ( n -- )
'[ do-shutdown-hooks _ (exit) ] ignore-errors
: exit ( n -- * )
[ do-shutdown-hooks (exit) ] ignore-errors
[ "Unexpected error during shutdown!" print flush ] ignore-errors
255 (exit) ;

0 comments on commit f3660a3

Please sign in to comment.