2591 |
(else |
(else |
2592 |
(error "use-syntax can only be used at the top level")))) |
(error "use-syntax can only be used at the top level")))) |
2593 |
|
|
2594 |
(define define-private define) |
(defmacro define-private args |
2595 |
|
`(define ,args)) |
2596 |
|
|
2597 |
(defmacro define-public args |
(defmacro define-public args |
2598 |
(define (syntax) |
(define (syntax) |
2667 |
(else |
(else |
2668 |
(error "re-export can only be used at the top level")))) |
(error "re-export can only be used at the top level")))) |
2669 |
|
|
2670 |
(define export-syntax export) |
(defmacro export-syntax names |
2671 |
(define re-export-syntax re-export) |
`(export ,names)) |
2672 |
|
|
2673 |
|
(defmacro export-syntax names |
2674 |
|
`(export ,names)) |
2675 |
|
|
2676 |
(define load load-module) |
(define load load-module) |
2677 |
|
|