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