diff options
| -rw-r--r-- | mu.arc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mu.arc b/mu.arc index 5aa3e7f6..70d4b534 100644 --- a/mu.arc +++ b/mu.arc @@ -578,9 +578,6 @@ (= rep.routine!limit (when (len> arg 2) (m arg.2))) (enq routine running-routines*) rep.routine!id) - assert - (unless (m arg.0) - (die (v arg.1))) sleep (do (case (v arg.0) @@ -594,6 +591,9 @@ (die "badly formed 'sleep' call @(tostring:prn (body.routine* pc.routine*))") ) ((abort-routine*))) + assert + (unless (m arg.0) + (die (v arg.1))) ; other routines will be able to look at the error status ; cursor-based (text mode) interaction clear-screen |