Hi,

Felix Rabe <[EMAIL PROTECTED]> writes:

> Thanks Michael, your patch got me compiling, though not yet to a running
> example:
[...]
> Bad arg to GC_general_register_disappearing_link
> Aborted

Oh.  You also need the patch below to object/st80/WeakArray.st
(excerpted again from struct-send-fixes.patch).

-- 
Michael FIG <[EMAIL PROTECTED]> //\
   http://michael.fig.org/    \//

diff -r 7b078983ae0b object/st80/WeakArray.st
--- a/object/st80/WeakArray.st  Wed Apr 23 12:17:46 2008 -0600
+++ b/object/st80/WeakArray.st  Wed Apr 23 12:19:45 2008 -0600
@@ -41,7 +41,7 @@ WeakArray at: anInteger put: anObject
     {
         if (((int)v_anInteger & 1) && ((int)v_anInteger > 1) && 
((int)v_anInteger <= (int)self->v_size))
            {
-               void *ptr= (void *)(self->v__pointers) + ((int)v_anInteger >> 
1) - 1;
+               void *ptr= &((oop *)self->v__pointers)[((int)v_anInteger >> 1) 
- 1];
                if (*(oop *)ptr)
                    _libid->gc_unregisterDisappearingLink(ptr);
            }
@@ -50,7 +50,7 @@ WeakArray at: anInteger put: anObject
     {
        if (v_anObject && !((long)v_anObject & 1))
            {
-               void *ptr= (void *)(self->v__pointers) + ((int)v_anInteger >> 
1) - 1;
+               void *ptr= &((oop *)self->v__pointers)[((int)v_anInteger >> 1) 
- 1];
                _libid->gc_generalRegisterDisappearingLink(ptr, 
&(v_anObject->_vtable[-1]));
            }
     }.

_______________________________________________
fonc mailing list
[email protected]
http://vpri.org/mailman/listinfo/fonc

Reply via email to