- versioning in macos
- fixes to input/output to improve interaction with eclipse console. -
This commit is contained in:
11
C/write.c
11
C/write.c
@@ -575,7 +575,7 @@ putAtom(Atom atom, int Quote_illegal, struct write_globs *wglb)
|
||||
wrf stream = wglb->stream;
|
||||
|
||||
if (IsBlob(atom)) {
|
||||
wrputblob(RepAtom(atom),wglb->Quote_illegal,wglb);
|
||||
wrputblob(RepAtom(atom),Quote_illegal,wglb);
|
||||
return;
|
||||
}
|
||||
if (IsWideAtom(atom)) {
|
||||
@@ -621,6 +621,15 @@ putAtom(Atom atom, int Quote_illegal, struct write_globs *wglb)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
Yap_WriteAtom(IOSTREAM *s, Atom atom)
|
||||
{
|
||||
struct write_globs wglb;
|
||||
wglb.stream = s;
|
||||
wglb.Quote_illegal = FALSE;
|
||||
putAtom(atom, 0, &wglb);
|
||||
}
|
||||
|
||||
static int
|
||||
IsCodesTerm(Term string) /* checks whether this is a string */
|
||||
{
|
||||
|
Reference in New Issue
Block a user