mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-08 19:02:27 +02:00
* boot-9.scm (define-private, export-syntax, export-syntax):
Changed definitions to form 'real' macro definitions.
This commit is contained in:
parent
7673491416
commit
ab382f5204
2 changed files with 11 additions and 3 deletions
|
@ -1,3 +1,8 @@
|
|||
2002-11-16 Dirk Herrmann <D.Herrmann@tu-bs.de>
|
||||
|
||||
* boot-9.scm (define-private, export-syntax, export-syntax):
|
||||
Changed definitions to form 'real' macro definitions.
|
||||
|
||||
2002-11-07 Marius Vollmer <marius.vollmer@uni-dortmund.de>
|
||||
|
||||
* format.scm (format): Use 'monitor' properly. Not the definition
|
||||
|
|
|
@ -2591,7 +2591,8 @@
|
|||
(else
|
||||
(error "use-syntax can only be used at the top level"))))
|
||||
|
||||
(define define-private define)
|
||||
(defmacro define-private args
|
||||
`(define ,args))
|
||||
|
||||
(defmacro define-public args
|
||||
(define (syntax)
|
||||
|
@ -2666,9 +2667,11 @@
|
|||
(else
|
||||
(error "re-export can only be used at the top level"))))
|
||||
|
||||
(define export-syntax export)
|
||||
(define re-export-syntax re-export)
|
||||
(defmacro export-syntax names
|
||||
`(export ,names))
|
||||
|
||||
(defmacro export-syntax names
|
||||
`(export ,names))
|
||||
|
||||
(define load load-module)
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue