diff options
| -rw-r--r-- | gcc/ChangeLog.MELT | 8 | ||||
| -rw-r--r-- | gcc/melt/generated/meltrunsup-inc.c | 5 | ||||
| -rw-r--r-- | gcc/melt/warmelt-modes.melt | 9 |
3 files changed, 8 insertions, 14 deletions
diff --git a/gcc/ChangeLog.MELT b/gcc/ChangeLog.MELT index 4433003d19d..ee20193fc2d 100644 --- a/gcc/ChangeLog.MELT +++ b/gcc/ChangeLog.MELT @@ -1,5 +1,13 @@ 2013-05-21 Basile Starynkevitch <basile@starynkevitch.net> + * melt/warmelt-modes.melt + (generate_runtypesupport_predefined_hooks) Remove the emission of + the check of the data hash. + + * melt/generated/meltrunsup-inc.c + (melthookproc_HOOK_NAMED_SYMBOL): Manually remove that check. + +2013-05-21 Basile Starynkevitch <basile@starynkevitch.net> * melt-runtime.h (meltgc_named_symbol): Remove declaration. diff --git a/gcc/melt/generated/meltrunsup-inc.c b/gcc/melt/generated/meltrunsup-inc.c index ba28eeece5e..612587a6641 100644 --- a/gcc/melt/generated/meltrunsup-inc.c +++ b/gcc/melt/generated/meltrunsup-inc.c @@ -3034,11 +3034,6 @@ melthookproc_HOOK_NAMED_SYMBOL (const char *meltin_NAM_p0, melt_assertmsg ("check predefhook name HOOK_NAMED_SYMBOL", !strncmp (melthkp->hookname, "HOOK_NAMED_SYMBOL", MELT_HOOKNAME_LEN - 1)); - /* check hook data HOOK_NAMED_SYMBOL */ - melt_assertmsg - ("good predefhook data hash HOOK_NAMED_SYMBOL or bootstrapping", - melt_flag_bootstrapping != 0 - || melt_obj_hash (melthkp->hookdata) == 454033420); return (*melthookptr_HOOK_NAMED_SYMBOL) ((melt_ptr_t) melthkp, meltin_NAM_p0, meltin_CREATE_p1); #endif /* MELT_SKIP_HOOK_PREDEFINED_CODE */ diff --git a/gcc/melt/warmelt-modes.melt b/gcc/melt/warmelt-modes.melt index ec7897a8f93..778c643d3fc 100644 --- a/gcc/melt/warmelt-modes.melt +++ b/gcc/melt/warmelt-modes.melt @@ -3826,15 +3826,6 @@ melt_scanning (melt_ptr_t p) "$HKNAME", MELT_HOOKNAME_LEN-1));}# ) (add2sbuf_indentnl outcodebuf 1) - (add2out - outcodebuf - ##{ /* check hook data $HKNAME */ - melt_assertmsg("good predefhook data hash $HKNAME or bootstrapping", melt_flag_bootstrapping != 0 - || melt_obj_hash (melthkp->hookdata) == }#) - - (add2out outcodebuf (obj_hash hkdata)) - (add2out outcodebuf ");") - (add2sbuf_indentnl outcodebuf 1) (add2out outcodebuf ##{return (*melthookptr_$HKNAME) ((melt_ptr_t)melthkp}# ) |