File tree 1 file changed +7
-7
lines changed
1 file changed +7
-7
lines changed Original file line number Diff line number Diff line change 55
55
' real)
56
56
57
57
(define-scheme-type (rational?)
58
- ' (or rational float ))
58
+ ` (or rational float ))
59
59
60
60
(define-scheme-type (integer?)
61
61
"
@@ -79,7 +79,7 @@ SATISFIES type, it should be used sparingly.
79
79
' double-float)
80
80
81
81
(define-scheme-type (exact-integer?)
82
- ` integer)
82
+ ' integer)
83
83
84
84
(define-scheme-type* (finite?) finitep
85
85
` (satisfies finitep))
@@ -103,7 +103,7 @@ known as #t or #f
103
103
104
104
(define-scheme-type (vector?)
105
105
" A Scheme vector is just a T vector"
106
- ` simple-vector)
106
+ ' simple-vector)
107
107
108
108
(define-scheme-type (string?)
109
109
" A Scheme string is just a simple string."
@@ -123,22 +123,22 @@ known as #t or #f
123
123
124
124
(define-scheme-type* (list?) a :proper-list-p
125
125
" Scheme's list? tests for a proper list"
126
- ` a:proper-list)
126
+ ' a:proper-list)
127
127
128
128
(define-scheme-type* (%list?) listp
129
129
"
130
130
A lower-level, faster list test that permits improper lists, which
131
131
don't end in NIL.
132
132
"
133
- ` list)
133
+ ' list)
134
134
135
135
(define-scheme-type* (pair?) consp
136
136
" A pair? in Scheme is a cons cell."
137
- ` cons)
137
+ ' cons)
138
138
139
139
(define-scheme-type* (null?) null
140
140
" A null? in Scheme is nil."
141
- ` null)
141
+ ' null)
142
142
143
143
; ;;; Type Conversion
144
144
You can’t perform that action at this time.
0 commit comments