fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

see changelog

Browse Source
This commit is contained in:
Eddie Runia
1999-05-29 14:05:09 +00:00
parent 5e40953f32
commit 066ff53a7e
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
19990529-15:00 CET Eddie Runia
* source/rtl/set.c
small correction in ReleaseSets()
19990528-14:30 EST David G. Holm <dholm@jsd-llc.com>
* source/rtl/console.c
- NIL ouptuts "NIL", just like it used to before I removed it after

6
harbour/source/rtl/set.c
View File

@@ -464,8 +464,8 @@ void InitializeSets (void)
void ReleaseSets (void)
{
if (hb_set_althan) close_text (hb_set_althan);
if (hb_set_printhan) close (hb_set_printhan);
if (hb_set_althan != -1) close_text (hb_set_althan);
if (hb_set_printhan != -1) close (hb_set_printhan);
if (hb_set.HB_SET_ALTFILE)
_xfree (hb_set.HB_SET_ALTFILE);
@@ -482,5 +482,5 @@ void ReleaseSets (void)
if (hb_set.HB_SET_PATH)
_xfree (hb_set.HB_SET_PATH);
if (hb_set.HB_SET_PRINTFILE)
_xfree (hb_set.HB_SET_PATH);
_xfree (hb_set.HB_SET_PRINTFILE);
}