[svn:parrot] r11415 - trunk/src

[leo]

Author: leo
Date: Fri Feb  3 06:49:22 2006
New Revision: 11415

Modified:
   trunk/src/sub.c
Log:
fix segfault with parrot -tf -O (missing debug seg)

Modified: trunk/src/sub.c
==============================================================================
--- trunk/src/sub.c     (original)
+++ trunk/src/sub.c     Fri Feb  3 06:49:22 2006
@@ -347,6 +347,8 @@ Parrot_Context_info(Interp *interpreter,
         size_t i, n;
         opcode_t *pc = sub->seg->base.data;
         struct PackFile_Debug *debug = sub->seg->debugs;
+        if (!debug)
+            return 0;
         for (i = n = 0; n < sub->seg->base.size; i++) {
             op_info_t *op_info = &interpreter->op_info_table[*pc];
             opcode_t var_args = 0;