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

encoding support.

Browse Source
This commit is contained in:
Vitor Santos Costa
2011-02-15 22:44:06 +00:00
parent 145b9c1b4a
commit 842f80e928
3 changed files with 24 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
packages/PLStream/pl-yap.c
View File

@@ -157,6 +157,17 @@ Yap_Eval(YAP_Term t)
return Yap_InnerEval(t);
}
IOENC
Yap_DefaultEncoding(void)
{
return LD->encoding;
}
void
Yap_SetDefaultEncoding(IOENC new_encoding)
{
LD->encoding = new_encoding;
}
int
valueExpression(term_t t, Number r ARG_LD)

2
packages/PLStream/pl-yap.h
View File

@@ -34,6 +34,8 @@ extern YAP_Int Yap_GetCurrentPredArity(void);
extern int Yap_read_term(term_t t, IOSTREAM *st, term_t vs);
extern int Yap_LookupSWIStream(void *swi_s);
extern term_t Yap_fetch_module_for_format(term_t args, YAP_Term *modp);
extern IOENC Yap_DefaultEncoding(void);
extern void Yap_SetDefaultEncoding(IOENC);
extern atom_t codeToAtom(int chrcode);