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

use stdbool

Browse Source
This commit is contained in:
Vítor Santos Costa
2014-09-09 23:53:10 -05:00
parent 1dd3ff800e
commit 3fd07064da
9 changed files with 29 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
os/pl-write.c
View File

@@ -400,11 +400,11 @@ pl_write_term3(term_t stream, term_t term, term_t opts)
{ GET_LD
bool quoted = FALSE;
bool ignore_ops = FALSE;
bool numbervars = -1; /* not set */
int numbervars = -1; /* not set */
bool portray = FALSE;
term_t gportray = 0;
bool bqstring = truePrologFlag(PLFLAG_BACKQUOTED_STRING);
bool charescape = -1; /* not set */
int charescape = -1; /* not set */
atom_t mname = ATOM_user;
atom_t attr = ATOM_nil;
atom_t blobs = ATOM_nil;
@@ -467,7 +467,7 @@ pl_write_term3(term_t stream, term_t term, term_t opts)
if ( charescape == TRUE ||
(charescape == -1
#ifndef __YAP_PROLOG__
&& true(options.module, M_CHARESCAPE)
&& True(options.module, M_CHARESCAPE)
#endif
) )
options.flags |= PL_WRT_CHARESCAPES;
@@ -488,7 +488,7 @@ pl_write_term3(term_t stream, term_t term, term_t opts)
if ( bqstring ) options.flags |= PL_WRT_BACKQUOTED_STRING;
if ( !cycles ) options.flags |= PL_WRT_NO_CYCLES;
local_varnames = (varnames && false(&options, PL_WRT_NUMBERVARS));
local_varnames = (varnames && False(&options, PL_WRT_NUMBERVARS));
BEGIN_NUMBERVARS(local_varnames);
if ( varnames )
@@ -553,7 +553,7 @@ do_write2(term_t stream, term_t term, int flags)
options.module = MODULE_user;
if ( options.module
#ifndef __YAP_PROLOG__
&& true(options.module, M_CHARESCAPE)
&& True(options.module, M_CHARESCAPE)
#endif
)
options.flags |= PL_WRT_CHARESCAPES;