cvsuser 05/03/29 00:25:54
Modified: src global_setup.c
Log:
[PATCH: perl #34587] Build Segfaults While Generating config.fpmc (Linux PPC)
> It looks like the first element of interpreter->iglobals is wrong.
Obviously storing a null pointer in there doesn't help. Here's a patch
that fixes things for me.
Courtesy of Chromatic <[EMAIL PROTECTED]>
Revision Changes Path
1.59 +2 -3 parrot/src/global_setup.c
Index: global_setup.c
===================================================================
RCS file: /cvs/public/parrot/src/global_setup.c,v
retrieving revision 1.58
retrieving revision 1.59
diff -u -r1.58 -r1.59
--- global_setup.c 9 Mar 2005 20:31:28 -0000 1.58
+++ global_setup.c 29 Mar 2005 08:25:54 -0000 1.59
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: global_setup.c,v 1.58 2005/03/09 20:31:28 leo Exp $
+$Id: global_setup.c,v 1.59 2005/03/29 08:25:54 leo Exp $
=head1 NAME
@@ -50,7 +50,6 @@
INTVAL i;
PMC *iglobals;
- PMC *classname_hash;
PMC *self;
#ifdef PARROT_HAS_PLATFORM_INIT_CODE
@@ -78,7 +77,7 @@
for (i = 0; i < (INTVAL)IGLOBALS_SIZE; i++)
VTABLE_set_pmc_keyed_int(interpreter, iglobals, i, NULL);
VTABLE_set_pmc_keyed_int(interpreter, iglobals,
- (INTVAL)IGLOBALS_CLASSNAME_HASH, classname_hash);
+ (INTVAL)IGLOBALS_CLASSNAME_HASH, interpreter->class_hash);
self = pmc_new_noinit(interpreter, enum_class_ParrotInterpreter);
PMC_data(self) = interpreter;
VTABLE_set_pmc_keyed_int(interpreter, iglobals,
