summaryrefslogtreecommitdiff
path: root/gcc/melt/warmelt-normatch.melt
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/melt/warmelt-normatch.melt')
-rw-r--r--gcc/melt/warmelt-normatch.melt3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/melt/warmelt-normatch.melt b/gcc/melt/warmelt-normatch.melt
index 88e5ae93b4c..32d5608dcea 100644
--- a/gcc/melt/warmelt-normatch.melt
+++ b/gcc/melt/warmelt-normatch.melt
@@ -1386,6 +1386,9 @@
))
(ntestcont (instance class_container)) ;container for tester
)
+ ;; I am not entirely sure of this assert! Perhaps there maybe
+ ;; strange cases where curpat is null...
+ (assert_msg "normexp_match check curpat" curpat)
(scan_pattern curpat curloc ctyp pcn)
(debug_msg mapvar "normexp_match mapvar")
(debug_msg mapcst "normexp_match mapcst")