diff options
Diffstat (limited to 'error.c')
-rw-r--r-- | error.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -1,6 +1,5 @@ #include <u.h> #include <libc.h> -#include <thread.h> #include <bio.h> #include "apl9.h" @@ -78,14 +77,11 @@ void displayerror(void) { ThreadData *td = getthreaddata(); - int tmp = td->requiredstack; - td->requiredstack = 0; Array *error = allocarray(AtypeArray, 1, 3); error->shape[0] = 3; error->arraydata[0] = mkrunearray(errorstr(td->lasterror)); error->arraydata[1] = mkrunearray(td->lasterrormsg ? td->lasterrormsg : L""); error->arraydata[2] = fnSame(td->name); rundfn(L"0::⎕RAWIO←⍵ ⋄ ('!' ⍵) ⍈ ⎕SESSION", nil, nil, nil, error); - td->requiredstack = tmp; freearray(error); }
\ No newline at end of file |