add syntax-source accessor
* module/ice-9/psyntax.scm: Add syntax-source accessor. * module/ice-9/psyntax-pp.scm: Regenerated. * module/ice-9/boot-9.scm: Declare syntax-source.
This commit is contained in:
parent
de976b75cd
commit
750ae8b7b7
3 changed files with 1403 additions and 1396 deletions
|
|
@ -2411,6 +2411,9 @@
|
|||
(lambda (x)
|
||||
(strip x empty-wrap)))
|
||||
|
||||
(set! syntax-source
|
||||
(lambda (x) (source-annotation x)))
|
||||
|
||||
(set! generate-temporaries
|
||||
(lambda (ls)
|
||||
(arg-check list? ls 'generate-temporaries)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue