[<<][staapl][>>][..]
Mon May 4 01:09:04 CEST 2009

macro exit without parameters

Seems to be quite straightforward.  Removed the parameter and replaced
it with this function:

;; The ";" word inspects the macro return stack.  If there's context,
;; execute mexit.  Otherwise we're in straight line code and can
;; execute primitive-exit.
(define (semi state)
  (if (null? (compiler-rs state))
      ((ns (macro) primitive-exit) state)
      ((ns (macro) mexit) state)))




[Reply][About]
[<<][staapl][>>][..]