Added eof-object

This commit is contained in:
Justin Ethier 2016-01-29 23:34:57 -05:00
parent 43e0cfdd4c
commit 7d0982992c

View file

@ -120,6 +120,7 @@
round
exact
inexact
eof-object
;;;;
; Possibly missing functions:
@ -146,7 +147,6 @@
; define-record-type
; define-values
; denominator
; eof-object
; get-output-string
; guard
; import
@ -913,4 +913,7 @@
Cyc_check_num(data, z2);
d.value = pow( unbox_number(z1), unbox_number(z2) );
return_closcall1(data, k, &d); ")
(define eof-object
"(void *data, int argc, closure _, object k)"
" return_closcall1(data, k, Cyc_EOF); ")
))