Rename reader-directive -> hash-bang-syntax
This commit is contained in:
parent
ff193eb4f0
commit
13ed02a959
16
generate.scm
16
generate.scm
|
@ -165,17 +165,15 @@
|
||||||
(append (group-file 'id "library-name.scm")
|
(append (group-file 'id "library-name.scm")
|
||||||
(splice-implementations)))))))
|
(splice-implementations)))))))
|
||||||
|
|
||||||
(define (reader-directive)
|
(define (hash-bang-syntax)
|
||||||
(registry
|
(registry
|
||||||
"Reader directives"
|
"#! lexical syntax"
|
||||||
"reader-directive"
|
"hash-bang-syntax"
|
||||||
'(p)
|
'(p)
|
||||||
(tabulate
|
(tabulate
|
||||||
'("ID" "Description" "Prefixes")
|
'("ID" "Description")
|
||||||
(map (lambda (entry)
|
(map the-usual
|
||||||
(append (the-usual entry)
|
(sort-by-id (group-file 'id "hash-bang-syntax.scm"))))))
|
||||||
(list `(code ,(assoc1 'prefixes entry)))))
|
|
||||||
(sort-by-id (group-file 'id "reader-directive.scm"))))))
|
|
||||||
|
|
||||||
(define (foreign-status-set)
|
(define (foreign-status-set)
|
||||||
(registry
|
(registry
|
||||||
|
@ -224,7 +222,7 @@
|
||||||
,(machine)
|
,(machine)
|
||||||
,(feature)
|
,(feature)
|
||||||
,(library-name)
|
,(library-name)
|
||||||
,(reader-directive)
|
,(hash-bang-syntax)
|
||||||
,(foreign-status-set)
|
,(foreign-status-set)
|
||||||
,(foreign-status-property)))))
|
,(foreign-status-property)))))
|
||||||
|
|
||||||
|
|
|
@ -1,35 +1,26 @@
|
||||||
(id bwp)
|
(id bwp)
|
||||||
(description "broken-weak-pair object")
|
(description "broken-weak-pair object")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id eof)
|
(id eof)
|
||||||
(description "end-of-file object")
|
(description "end-of-file object")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id fold-case)
|
(id fold-case)
|
||||||
(description "change to case insensitive identifiers")
|
(description "change to case insensitive identifiers")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id key)
|
(id key)
|
||||||
(description "start keyword arguments in lambda list")
|
(description "start keyword arguments in lambda list")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id no-fold-case)
|
(id no-fold-case)
|
||||||
(description "change to case sensitive identifiers")
|
(description "change to case sensitive identifiers")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id optional)
|
(id optional)
|
||||||
(description "start optional arguments in lambda list")
|
(description "start optional arguments in lambda list")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id r6rs)
|
(id r6rs)
|
||||||
(description "change to R6RS read syntax")
|
(description "change to R6RS read syntax")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id r7rs)
|
(id r7rs)
|
||||||
(description "change to R7RS read syntax")
|
(description "change to R7RS read syntax")
|
||||||
(prefixes "#!")
|
|
||||||
|
|
||||||
(id rest)
|
(id rest)
|
||||||
(description "start rest argument in lambda list")
|
(description "start rest argument in lambda list")
|
||||||
(prefixes "#!")
|
|
Loading…
Reference in New Issue