blob: 1a639233e1b965ca82e90db910e422893fc01772 (
about) (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
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"))
)
|
