Ticket #1397: tt1397.patch

File tt1397.patch, 3.5 KB (added by jimmy, 12 years ago)

this patch fix a waring occured in the patch of TT #1396

  • src/pmc/sub.pmc

     
    3636} 
    3737 
    3838pmclass Sub auto_attrs { 
    39     ATTR PackFile_ByteCode *seg;     /* bytecode segment */ 
    40     ATTR size_t   start_offs;        /* sub entry in ops from seg->base.data */ 
    41     ATTR size_t   end_offs; 
     39    ATTR PackFile_ByteCode   *seg;                /* bytecode segment */ 
     40    ATTR size_t               start_offs;         /* sub entry in ops from seg->base.data */ 
     41    ATTR size_t               end_offs; 
    4242 
    43     ATTR INTVAL   HLL_id;             /* see src/hll.c XXX or per segment? */ 
    44     ATTR PMC      *namespace_name;    /* where this Sub is in - this is either 
    45                                   * a String or a [Key] and describes 
    46                                   * the relative path in the NameSpace 
    47                                   */ 
    48     ATTR PMC      *namespace_stash;   /* the actual hash, HLL::namespace */ 
    49     ATTR STRING   *name;              /* name of the sub */ 
    50     ATTR STRING   *method_name;       /* method name of the sub */ 
    51     ATTR STRING   *ns_entry_name;     /* ns entry name of the sub */ 
    52     ATTR STRING   *subid;             /* The ID of the sub. */ 
    53     ATTR INTVAL   vtable_index;       /* index in Parrot_vtable_slot_names */ 
    54     ATTR PMC      *multi_signature;   /* list of types for MMD */ 
    55     ATTR INTVAL   n_regs_used[4];     /* INSP in PBC */ 
     43    ATTR INTVAL               HLL_id;             /* see src/hll.c XXX or per segment? */ 
     44    ATTR PMC                 *namespace_name;     /* where this Sub is in - this is either 
     45                                                   * a String or a [Key] and describes 
     46                                                   * the relative path in the NameSpace 
     47                                                   */ 
     48    ATTR PMC                 *namespace_stash;    /* the actual hash, HLL::namespace */ 
     49    ATTR STRING              *name;               /* name of the sub */ 
     50    ATTR STRING              *method_name;        /* method name of the sub */ 
     51    ATTR STRING              *ns_entry_name;      /* ns entry name of the sub */ 
     52    ATTR STRING              *subid;              /* The ID of the sub. */ 
     53    ATTR INTVAL               vtable_index;       /* index in Parrot_vtable_slot_names */ 
     54    ATTR PMC                 *multi_signature;    /* list of types for MMD */ 
     55    ATTR UINTVAL              n_regs_used[4];     /* INSP in PBC */ 
    5656 
    57     ATTR PMC      *lex_info;          /* LexInfo PMC */ 
    58     ATTR PMC      *outer_sub;         /* :outer for closures */ 
    59     ATTR PMC      *eval_pmc;          /* eval container / NULL */ 
    60     ATTR PMC      *ctx;               /* the context this sub is in */ 
    61     ATTR UINTVAL  comp_flags;         /* compile time and additional flags */ 
    62     ATTR Parrot_sub_arginfo *arg_info;/* Argument counts and flags. */ 
     57    ATTR PMC                 *lex_info;           /* LexInfo PMC */ 
     58    ATTR PMC                 *outer_sub;          /* :outer for closures */ 
     59    ATTR PMC                 *eval_pmc;           /* eval container / NULL */ 
     60    ATTR PMC                 *ctx;                /* the context this sub is in */ 
     61    ATTR UINTVAL             comp_flags;          /* compile time and additional flags */ 
     62    ATTR Parrot_sub_arginfo *arg_info;            /* Argument counts and flags. */ 
    6363 
    6464    /* - end common */ 
    65     ATTR PMC      *outer_ctx;         /* outer context, if a closure */ 
     65    ATTR PMC                *outer_ctx;           /* outer context, if a closure */ 
    6666 
    6767/* 
    6868