diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-05-27 14:28:04 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-05-27 14:28:04 +0000 |
commit | d3ed35175e394ed9bf2721192f14f57c91c1fbe9 (patch) | |
tree | 0f840a1adc236014a99d01feb0d876cfcb192460 /gcc/testsuite/melt | |
parent | b57b5d53f8a8217cfa7a92aa68210bad8a697dc9 (diff) | |
download | gcc-d3ed35175e394ed9bf2721192f14f57c91c1fbe9.tar.gz |
2009-05-27 Basile Starynkevitch <basile@starynkevitch.net>
[funmatcher-s seems to work]
* gcc/testsuite/melt/tfunmatch-1.melt: replaced == by ==i in test.
* gcc/melt/warmelt-first.melt: Renamed binder as binderv to avoid
warning in overwrite_env.
* gcc/melt/warmelt-normal.melt: Added empty lines for readability.
* gcc/melt/warmelt-normatch.melt: Fixed in normpat_anymatchpat missing
initialisation of matvar.
* gcc/melt/warmelt-genobj.melt: Completed compilmatcher_funmatcher.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@147912 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/melt')
-rw-r--r-- | gcc/testsuite/melt/tfunmatch-1.melt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/melt/tfunmatch-1.melt b/gcc/testsuite/melt/tfunmatch-1.melt index 21f7c8536c0..dfb4db1c8de 100644 --- a/gcc/testsuite/melt/tfunmatch-1.melt +++ b/gcc/testsuite/melt/tfunmatch-1.melt @@ -18,7 +18,7 @@ (debug_msg fmat "matchbiggereven start fmat=") (messagenum_dbg "matchbiggereven m=" m) (messagenum_dbg "matchbiggereven n=" n) - (if (== (%iraw m 2) 0) + (if (==i (%iraw m 2) 0) (if (>i m n) (let ( (:long h (/iraw m 2)) ) (messagenum_dbg "matchbiggereven h=" h) |