io routines now at an acceptable level

parent cc9f9216
......@@ -47,6 +47,7 @@
(define-syntax-rule (define-error (nm a ...) code)
(define (nm s p cc a ...)
;(pk 'error (list a ...))
(abort-to-prompt tag
(lambda ()
(G
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment