diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-12-02 17:22:28 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-12-02 17:22:28 +0000 |
| commit | e74c52066d421b027ce1be36e02dce615caac397 (patch) | |
| tree | c917feacae93c2b466940aefd59624dc60091545 | |
| parent | 5590f387f55d669bc2b839fd6586d0d81ca54fad (diff) | |
| download | open-axiom-e74c52066d421b027ce1be36e02dce615caac397.tar.gz | |
Fix SF/3448433
* interp/br-util.boot (bcPred): Do not compare pred against a string.
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/interp/br-util.boot | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 02df4c38..3364d23c 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,10 @@ 2011-12-02 Gabriel Dos Reis <gdr@cs.tamu.edu> + Fix SF/3448433 + * interp/br-util.boot (bcPred): Do not compare pred against a string. + +2011-12-02 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/g-opt.boot (modified?): Examine the rhs too. 2011-12-01 Gabriel Dos Reis <gdr@cs.tamu.edu> diff --git a/src/interp/br-util.boot b/src/interp/br-util.boot index c20e5d23..acc4ed9a 100644 --- a/src/interp/br-util.boot +++ b/src/interp/br-util.boot @@ -415,7 +415,7 @@ bcConPredTable(u,conname,:options) == htEndTable() bcPred(pred,:options) == - pred = '"" or pred = true or null pred => 'skip + pred is true or pred = nil => 'skip italicList := IFCAR options if not IFCAR IFCDR options then htSay '" {\em if} " htPred2English(pred,italicList) |