Ticket #388: pbc_sf.patch

File pbc_sf.patch, 0.6 KB (added by cotto, 13 years ago)

segfaults Parrot when writing pbc_sf.pir to pbc

  • src/packout.c

     
    226226    GETATTR_Key_num_key(interp, key, key_num); 
    227227 
    228228    for (i = 0; i < ct->const_count; i++) { 
    229         if (type == PFC_STRING && ct->constants[i]->u.string == key_str) 
     229        if (type == PFC_STRING && Parrot_str_equal(interp, ct->constants[i]->u.string, key_str)) 
    230230            return i; 
    231231        if (type == PFC_NUMBER && ct->constants[i]->u.number == key_num) 
    232232            return i;