(define *core-symbols* '())
(define *prelude-core-symbols* '())

; expands into lots of (define *core-??* '())

(define-core-variables)

(define (init-core-symbols)
  (setf *core-symbols* (make-table))
  (setf *prelude-core-symbols* (make-table))
  (create-core-globals))