diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

make sure everything is close together.

Browse Source
This commit is contained in:
Vitor Santos Costa 2010-01-31 23:03:27 +00:00
parent 10744069fc
commit 6b8c2b096a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/iopreds.c
View File

@ -2349,9 +2349,9 @@ p_open (void)
st->status = s; st->status = s;
st->charcount = 0; st->charcount = 0;
st->linecount = 1; st->linecount = 1;
st->linepos = 0;
st->u.file.name = Yap_LookupAtom (Yap_FileNameBuf); st->u.file.name = Yap_LookupAtom (Yap_FileNameBuf);
st->u.file.user_name = file_name; st->u.file.user_name = file_name;
st->linepos = 0;
st->stream_putc = FilePutc; st->stream_putc = FilePutc;
st->stream_wputc = put_wchar; st->stream_wputc = put_wchar;
st->stream_getc = PlGetc; st->stream_getc = PlGetc;