#lang scheme/base ;; PLT module language for forth/macro which compiles purrr Forth ;; style syntax to purrr pseudo-assembly code (qw, cw, jw) (require "../purrr.ss" (for-syntax syntax/stx scheme/base)) (provide (rename-out (forth-module-begin #%module-begin)) (except-out (all-from-out scheme/base) #%module-begin) (all-from-out "../purrr.ss"))