[svn:parrot] r35779 - trunk/compilers/imcc
[email protected] Mon, 19 Jan 2009 15:22:08 -0800 (PST)
| Newsgroups | perl.cvs.parrot |
|---|---|
| Message-ID | <[email protected]> |
Author: julianalbo
Date: Mon Jan 19 15:22:07 2009
New Revision: 35779
Modified:
trunk/compilers/imcc/symreg.c
Log:
add assertion that catches TT #162 segfault
Modified: trunk/compilers/imcc/symreg.c
==============================================================================
--- trunk/compilers/imcc/symreg.c (original)
+++ trunk/compilers/imcc/symreg.c Mon Jan 19 15:22:07 2009
@@ -251,6 +251,10 @@
{
ASSERT_ARGS(mk_symreg)
IMC_Unit * const unit = IMCC_INFO(interp)->last_unit;
+
+ /* Check for the condition that fires up a segfault in TT #162 */
+ PARROT_ASSERT(unit != NULL);
+
return _mk_symreg(&unit->hash, name, t);
}