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

clean name on close

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-08-05 16:44:38 -05:00
parent 04b1d2bafb
commit 339048c76b
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
os/streams.c
View File

@ -937,6 +937,7 @@ void Yap_CloseStream(int sno) { CloseStream(sno); }
void Yap_ReleaseStream(int sno) { void Yap_ReleaseStream(int sno) {
CACHE_REGS CACHE_REGS
GLOBAL_Stream[sno].status = Free_Stream_f; GLOBAL_Stream[sno].status = Free_Stream_f;
GLOBAL_Stream[sno].user_name = 0;
Yap_DeleteAliases(sno); Yap_DeleteAliases(sno);
if (LOCAL_c_input_stream == sno) { if (LOCAL_c_input_stream == sno) {
LOCAL_c_input_stream = StdInStream; LOCAL_c_input_stream = StdInStream;