5 lines
91 B
Scheme
5 lines
91 B
Scheme
(if (and (char? (CHAR-CONSTANT))
|
|
(string? (STRING-CONSTANT)))
|
|
(exit 0)
|
|
(exit 1))
|