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

use flags to control and float

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-10-27 22:58:06 +00:00
parent ce828f52c9
commit 2047885bfa
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
os/readterm.c
View File

@ -720,7 +720,8 @@ static parser_state_t parseError(REnv *re, FEnv *fe, int inp_stream) {
Yap_Error(SYNTAX_ERROR, terr, LOCAL_ErrorMessage); Yap_Error(SYNTAX_ERROR, terr, LOCAL_ErrorMessage);
return YAP_PARSING_FINISHED; return YAP_PARSING_FINISHED;
} else { } else {
Yap_PrintWarning(terr); Term tn = Yap_MkApplTerm(FunctorShortSyntaxError, 1, &terr);
Yap_PrintWarning(tn);
LOCAL_Error_TYPE = YAP_NO_ERROR; LOCAL_Error_TYPE = YAP_NO_ERROR;
if (ParserErrorStyle == TermDec10) if (ParserErrorStyle == TermDec10)
return YAP_SCANNING; return YAP_SCANNING;
@ -991,7 +992,7 @@ static Int read_clause2(USES_REGS1) {
* *
* The next two options are called implicitly: * The next two options are called implicitly:
* *
* + The `module` option is initialised to the current source module, by * + The `module` option is initialized to the current source module, by
*default. *default.
* + The `tons` option is set from the single var flag * + The `tons` option is set from the single var flag
*/ */