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

fix bug in trail expansion (should recover numbers)

Browse Source
This commit is contained in:
Vítor Santos Costa 2012-04-15 22:40:00 +01:00
parent c385dc13a8
commit 8894645017
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
C/grow.c
View File

@ -718,6 +718,11 @@ AdjustScannerStacks(TokEntry **tksp, VarEntry **vep USES_REGS)
TokEntry *tktmp; TokEntry *tktmp;
switch (tks->Tok) { switch (tks->Tok) {
case Number_tok:
if (IsApplTerm(tks->TokInfo)) {
tks->TokInfo = AdjustAppl(tks->TokInfo PASS_REGS);
}
break;
case Var_tok: case Var_tok:
case String_tok: case String_tok:
if (IsOldTrail(tks->TokInfo)) if (IsOldTrail(tks->TokInfo))