Define unspecific value

2022-07-19 17:08:46 +10:00 · 2022-07-19 17:08:46 +10:00 · 5ea95d2e28
parent 2fec5376cc
commit 5ea95d2e28
1 changed files with 1 additions and 2 deletions
--- a/prescheme/scheme48.scm
+++ b/prescheme/scheme48.scm
@ -26,5 +26,4 @@
 (define ascii->char integer->char)
 (define char->ascii char->integer)

-;; TODO: requires define-enumeration
-(define unspecific (const #f))
+(define unspecific (if #f #f))