diff options
author | Yale AI Dept <ai@nebula.cs.yale.edu> | 1993-07-14 13:08:00 -0500 |
---|---|---|
committer | Duncan McGreggor <duncan.mcgreggor@rackspace.com> | 1993-07-14 13:08:00 -0500 |
commit | 4e987026148fe65c323afbc93cd560c07bf06b3f (patch) | |
tree | 26ae54177389edcbe453d25a00c38c2774e8b7d4 /top/top.scm |
Import to github.
Diffstat (limited to 'top/top.scm')
-rw-r--r-- | top/top.scm | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/top/top.scm b/top/top.scm new file mode 100644 index 0000000..1a63923 --- /dev/null +++ b/top/top.scm @@ -0,0 +1,46 @@ +;;; top.scm -- compilation unit definition for the top level + +;;; Global includes the ast definitions and all global data structures +;;; used in the compiler. + +(define-compilation-unit global + (source-filename "$Y2/top/") + (require ast) + (unit has-utils + (source-filename "has-utils.scm")) + (unit core-definitions + (require has-utils) + (source-filename "core-definitions.scm")) + (unit core-symbols + (require core-definitions) + (source-filename "core-symbols.scm")) + (unit core-init + (require core-symbols) + (source-filename "core-init.scm")) + (unit globals + (require core-init) + (source-filename "globals.scm")) + (unit has-macros + (source-filename "has-macros.scm")) + ) + + +;;; These files do not need to be required by other units + +(define-compilation-unit top-level + (source-filename "$Y2/top/") + (require global) + (unit phases + (source-filename "phases.scm")) + (unit system-init + (source-filename "system-init.scm")) + (unit errors + (source-filename "errors.scm")) + (unit tuple + (source-filename "tuple.scm")) + (unit symbol-table + (source-filename "symbol-table.scm")) + ) + + + |