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

fixes

Browse Source
This commit is contained in:
Vitor Santos Costa 2013-11-13 13:39:30 +00:00
parent 41c2d856a7
commit 7930b4d648
2 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/init.c
View File

@ -900,7 +900,6 @@ InitFlags(void)
{ {
/* note that Yap_heap_regs must be set first */ /* note that Yap_heap_regs must be set first */
yap_flags[YAP_TO_CHARS_FLAG] = ISO_TO_CHARS;
yap_flags[LANGUAGE_MODE_FLAG] = 0; yap_flags[LANGUAGE_MODE_FLAG] = 0;
yap_flags[STRICT_ISO_FLAG] = FALSE; yap_flags[STRICT_ISO_FLAG] = FALSE;
yap_flags[SOURCE_MODE_FLAG] = FALSE; yap_flags[SOURCE_MODE_FLAG] = FALSE;

5
C/stdpreds.c
View File

@ -1649,11 +1649,6 @@ p_set_yap_flags( USES_REGS1 )
value = IntOfTerm(tvalue); value = IntOfTerm(tvalue);
/* checking should have been performed */ /* checking should have been performed */
switch(flag) { switch(flag) {
case YAP_TO_CHARS_FLAG:
if (value != 0 && value != 1)
return(FALSE);
yap_flags[YAP_TO_CHARS_FLAG] = value;
break;
case LANGUAGE_MODE_FLAG: case LANGUAGE_MODE_FLAG:
if (value < 0 || value > 2) if (value < 0 || value > 2)
return(FALSE); return(FALSE);