summaryrefslogtreecommitdiff
path: root/gcc/melt/warmelt-base.melt
diff options
context:
space:
mode:
authorbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2012-06-16 20:21:13 +0000
committerbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2012-06-16 20:21:13 +0000
commit2f2639928aeeee7b4f0bdffc81807e900d6ddcd7 (patch)
treec1677aff12d022b5f40653cf61d77ac9f3288921 /gcc/melt/warmelt-base.melt
parent424eeed557fe8a2e031ebd549a79d2359686d842 (diff)
downloadgcc-2f2639928aeeee7b4f0bdffc81807e900d6ddcd7.tar.gz
2012-06-16 Basile Starynkevitch <basile@starynkevitch.net>
* melt-build.tpl (meltarg_genworklink): Define and use it. * melt-build.mk: Regenerate. * melt/warmelt-base.melt (checkval_dbg): Cast argument to void to avoid warnings in generated C file. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@188696 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/melt/warmelt-base.melt')
-rw-r--r--gcc/melt/warmelt-base.melt2
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.}#