fix format bug
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1447 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
24f967c9f5
commit
592517f09d
@ -3799,10 +3799,14 @@ format_has_tabs(const char *seq)
|
|||||||
ch = *seq++;
|
ch = *seq++;
|
||||||
if (ch == '*') {
|
if (ch == '*') {
|
||||||
ch = *seq++;
|
ch = *seq++;
|
||||||
|
} else {
|
||||||
|
while (ch >= '0' && ch <= '9') ch = *seq++;
|
||||||
}
|
}
|
||||||
if (ch == 't' || ch == '|' || ch == '@') {
|
if (ch == 't' || ch == '|' || ch == '@' || ch == '+') {
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
if (!ch)
|
||||||
|
return FALSE;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
return FALSE;
|
return FALSE;
|
||||||
|
@ -16,6 +16,7 @@
|
|||||||
|
|
||||||
<h2>Yap-5.1.0:</h2>
|
<h2>Yap-5.1.0:</h2>
|
||||||
<ul>
|
<ul>
|
||||||
|
<li> FIXED: format_has_tabs could miss tab signs. </li>
|
||||||
<li> FIXED: plug holes in memory allocation from scanner. </li>
|
<li> FIXED: plug holes in memory allocation from scanner. </li>
|
||||||
<li> FIXED: instrument memory allocation use use_malloc. </li>
|
<li> FIXED: instrument memory allocation use use_malloc. </li>
|
||||||
<li> FIXED: adjust_cp_hbs was readjusting consumer choice-points (it
|
<li> FIXED: adjust_cp_hbs was readjusting consumer choice-points (it
|
||||||
|
Reference in New Issue
Block a user