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

warning and other cleanups

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-10-22 00:52:49 +01:00
parent 03850291c0
commit d70def0012
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
C/text.c
View File

@ -91,7 +91,7 @@ SkipListCodes(unsigned char **bufp, Term *l, Term **tailp, Int *atoms, bool *wid
return 0; return 0;
} }
if ( IsPairTerm(*l) ) if ( IsPairTerm(*l) )
{ intptr_t power = 1, lam = 0; {
Term hd0 = HeadOfTerm(*l); Term hd0 = HeadOfTerm(*l);
if (IsVarTerm(hd0)) { if (IsVarTerm(hd0)) {
return -INSTANTIATION_ERROR; return -INSTANTIATION_ERROR;
@ -962,7 +962,6 @@ write_length( void *s0, seq_tv_t *out, encoding_t enc, int minimal, size_t leng
static Term static Term
write_number( void *s0, seq_tv_t *out, encoding_t enc, int minimal, int size USES_REGS) write_number( void *s0, seq_tv_t *out, encoding_t enc, int minimal, int size USES_REGS)
{ {
Term o;
return return
Yap_StringToNumberTerm(s0, &enc); Yap_StringToNumberTerm(s0, &enc);
} }