Add alternate syntax for s7 arrays

hash-syntax.scm

@@ -29,7 +29,7 @@
 (description "Regular expression [Gauche]")
 
 (id "#:")
-(description "Keyword object [Chicken, Guile, S7]; Keyword marker [Kawa, Racket]; Uninterned symbol [Gauche]")
+(description "Keyword object [Chicken, Guile, s7]; Keyword marker [Kawa, Racket]; Uninterned symbol [Gauche]")
 
 (id "#;")
 (description "S-expression comment [R6RS, R7RS, SRFI 62]")
@@ -67,29 +67,41 @@
 (id "#b")
 (description "Binary integer [R2RS+]")
 
+(id "#c<n>(...)")
+(description "n-bit complex vector [SRFI 160: n = 64, 128]")
+
 (id "#ci")
 (description "Change to case insensitive identifiers [Chicken]")
 
 (id "#cs")
 (description "Change to case sensitive identifiers [Chicken]")
 
+(id "#<n>d(...)")
+(description "n-dimensional array [s7]")
+
 (id "#d")
 (description "Decimal number [R2RS+]")
 
-(id "#<n>d")
-(description "n-dimensional vector [s7]")
-
 (id "#e")
 (description "Exact number [R2RS+]")
 
 (id "#f")
 (description "Boolean false [R3RS+]")
 
+(id "#f<n>(...)")
+(description "n-bit float vector [SRFI 4, 160: n = 32, 64]")
+
 (id "#false")
 (description "Boolean false [R7RS]")
 
+(id "#<n>i(...)")
+(description "n-dimensional signed integer array [s7]")
+
 (id "#i")
-(description "Inexact number [R2RS+]; n-dimensional integer vector [s7]")
+(description "Inexact number [R2RS+]")
+
+(id "#i<n>d(...)")
+(description "n-dimensional signed integer array [s7]")
 
 (id "#lang")
 (description "Declare which programming language is used [Racket]")
@@ -97,24 +109,39 @@
 (id "#o")
 (description "Octal integer [R2RS+]")
 
-(id "#r")
-(description "n-dimensional real (i.e. float) vector [s7]")
-
 (id "#<n>r")
 (description "Number in radix n [Chez Scheme]")
 
+(id "#<n>r(...)")
+(description "n-dimensional real (i.e. float) array [s7]")
+
+(id "#r<n>d(...)")
+(description "n-dimensional real (i.e. float) array [s7]")
+
+(id "#s<n>(...)")
+(description "n-bit signed integer vector [SRFI 4, 160: n = 8, 16, 32, 64]")
+
 (id "#t")
 (description "Boolean true [R3RS+]")
 
 (id "#true")
 (description "Boolean true [R7RS]")
 
-(id "#u(...)")
-(description "n-dimensional bytevector [s7]")
+(id "#<n>u(...)")
+(description "n-dimensional byte array [s7]")
+
+(id "#u<n>(...)")
+(description "n-bit unsigned integer vector [SRFI 4, 160: n = 8, 16, 32, 64]")
+
+(id "#u<n>d(...)")
+(description "n-dimensional byte array [s7]")
 
 (id "#u8(...)")
 (description "Bytevector [R7RS]")
 
+(id "#u8\"...\"")
+(description "String-notated bytevector [SRFI 207]")
+
 (id "#vu8(...)")
 (description "Bytevector [R6RS]")