Rename reader-directive -> hash-bang-syntax

generate.scm

@@ -165,17 +165,15 @@
                     (append (group-file 'id "library-name.scm")
                             (splice-implementations)))))))
 
-(define (reader-directive)
+(define (hash-bang-syntax)
   (registry
-   "Reader directives"
-   "reader-directive"
+   "#! lexical syntax"
+   "hash-bang-syntax"
    '(p)
    (tabulate
-    '("ID" "Description" "Prefixes")
-    (map (lambda (entry)
-           (append (the-usual entry)
-                   (list `(code ,(assoc1 'prefixes entry)))))
-         (sort-by-id (group-file 'id "reader-directive.scm"))))))
+    '("ID" "Description")
+    (map the-usual
+         (sort-by-id (group-file 'id "hash-bang-syntax.scm"))))))
 
 (define (foreign-status-set)
   (registry
@@ -224,7 +222,7 @@
       ,(machine)
       ,(feature)
       ,(library-name)
-      ,(reader-directive)
+      ,(hash-bang-syntax)
       ,(foreign-status-set)
       ,(foreign-status-property)))))
 

hash-bang-syntax.scm

@@ -1,35 +1,26 @@
 (id bwp)
 (description "broken-weak-pair object")
-(prefixes "#!")
 
 (id eof)
 (description "end-of-file object")
-(prefixes "#!")
 
 (id fold-case)
 (description "change to case insensitive identifiers")
-(prefixes "#!")
 
 (id key)
 (description "start keyword arguments in lambda list")
-(prefixes "#!")
 
 (id no-fold-case)
 (description "change to case sensitive identifiers")
-(prefixes "#!")
 
 (id optional)
 (description "start optional arguments in lambda list")
-(prefixes "#!")
 
 (id r6rs)
 (description "change to R6RS read syntax")
-(prefixes "#!")
 
 (id r7rs)
 (description "change to R7RS read syntax")
-(prefixes "#!")
 
 (id rest)
 (description "start rest argument in lambda list")
-(prefixes "#!")