diff options
Diffstat (limited to 'streams.c')
-rw-r--r-- | streams.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -84,7 +84,7 @@ openstream(Rune *sourcesink, Rune *mode, Term *options, Term **stream) } Stream *s = openstreamfd(fd, bio, TextStream, smode); - *stream = mknumber(NumberInt, s->fd, 0); + *stream = mkinteger(s->fd); return 0; } @@ -116,13 +116,13 @@ closestream(Term *t) Term * currentinputstream(void) { - return mknumber(NumberInt, currentinput->fd, 0); + return mkinteger(currentinput->fd); } Term * currentoutputstream(void) { - return mknumber(NumberInt, currentoutput->fd, 0); + return mkinteger(currentoutput->fd); } void @@ -268,7 +268,7 @@ Stream * getstream(Term *t) { Stream *s = nil; - if(t->tag == NumberTerm && t->numbertype == NumberInt) + if(t->tag == IntegerTerm) s = getstreambyfd(t->ival); else if(t->tag == AtomTerm) s = getstreambyalias(t->text); |