diff options
Diffstat (limited to 'gcc/melt/warmelt-base.melt')
| -rw-r--r-- | gcc/melt/warmelt-base.melt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/melt/warmelt-base.melt b/gcc/melt/warmelt-base.melt index 3a11891fffe..46929bef2dd 100644 --- a/gcc/melt/warmelt-base.melt +++ b/gcc/melt/warmelt-base.melt @@ -692,7 +692,7 @@ an integer $I if $I is lower than $N.}# (defprimitive checkval_dbg (val :cstring msg) :void :doc #{Low-level costly check of value $VAL with message $MSG. Mostly useful for gurus.}# - #{{if ($VAL) melt_checked_assignmsg ((melt_ptr_t) ($VAL),($MSG));}}#) + #{{if ($VAL) melt_checked_assignmsg ((melt_ptr_t) ($VAL),($MSG));else (void)$MSG;}}#) (defprimitive debugcstring (:cstring msg str) :void :doc #{Debug cstring $MSG $STR.}# |