Ticket #47: const_string.patch

File const_string.patch, 1.0 KB (added by doughera@…, 6 years ago)

patch

  • src/exceptions.c

    old new  
    195195        STRING * const message     = VTABLE_get_string(interp, exception); 
    196196        const INTVAL   severity    = VTABLE_get_integer_keyed_str(interp, exception, CONST_STRING(interp, "severity")); 
    197197        if (severity < EXCEPT_error) { 
    198             PMC *resume = VTABLE_get_attr_str(interp, exception, 
    199                     CONST_STRING(interp, "resume")); 
     198            PMC *resume = VTABLE_get_attr_str(interp, exception, CONST_STRING(interp, "resume")); 
    200199            if (string_equal(interp, message, CONST_STRING(interp, "")) == 1) { 
    201200                Parrot_io_eprintf(interp, "%S\n", message); 
    202201            } 
     
    206205 
    207206            /* caution against output swap (with PDB_backtrace) */ 
    208207            fflush(stderr); 
    209             //PDB_backtrace(interp); 
     208            /* PDB_backtrace(interp); */ 
    210209 
    211210            if (!PMC_IS_NULL(resume)) { 
    212211                return VTABLE_invoke(interp, resume, NULL);