Changeset 460

Show
Ignore:
Timestamp:
08/28/07 15:08:34 (1 year ago)
Author:
krobillard
Message:

Fixed LocalFrame? alignment on 32-bit CPUs.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/thune/internal.h

    r458 r460  
    241241 
    242242 
    243 typedef struct 
     243struct LocalFrame 
    244244{ 
    245245    UCell*  cell;   // Points into data stack. 
    246246    int32_t n; 
    247 } 
    248 LocalFrame; 
     247}; 
    249248 
    250249 
    251250#define UR_LF_BEG           ((LocalFrame*) ut->localFT) 
    252251#define UR_LF_END           ((LocalFrame*)(ut->cstack + UR_CSTACK_SIZE)) 
     252#define UR_LF_PUSH          --ut->localFT 
    253253#define UR_LF_POP           ++ut->localFT 
    254254 

  • trunk/thune/rune/rune.c

    r458 r460  
    681681 
    682682        //UR_LF_PUSH( -val->func.sigN, UR_TOS - (argc - 1) ); 
    683         --ut->localFT; 
     683        UR_LF_PUSH; 
    684684        UR_LF_BEG->cell = UR_TOS - (argc - 1); 
    685685        UR_LF_BEG->n    = val->func.sigN; 

  • trunk/thune/thune.c

    r458 r460  
    856856                } 
    857857 
    858                 --ut->localFT; 
     858                UR_LF_PUSH; 
    859859                UR_LF_BEG->cell = UR_TOS - (argc - 1); 
    860860                UR_LF_BEG->n    = val->func.sigN; 

  • trunk/thune/urlan.h

    r458 r460  
    429429#define UR_TASK_TERM       4 
    430430 
    431 typedef struct UrlanEnv  UrlanEnv; 
     431typedef struct UrlanEnv     UrlanEnv; 
     432typedef struct LocalFrame   LocalFrame; 
    432433 
    433434typedef struct 
    …… 
    444445    short     flags; 
    445446    short     _pad; 
    446     UCell*  localFT;    // LocalFrame* 
     447    LocalFrame* localFT; 
    447448 
    448449    UCell*  tos;