Ignore:
Timestamp:
Apr 17, 2011, 10:27:59 AM (11 years ago)
Author:
Sam Hocevar
Message:

lisp: start refactoring the core engine and garbage collector.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/src/lisp/lisp.hpp

    r124 r480  
    2525       USER_SPACE,
    2626       GC_SPACE };
    27 #define CAR(x) ((cons_cell *)x)->car
    28 #define CDR(x) ((cons_cell *)x)->cdr
    29 
    3027
    3128#define FIXED_TRIG_SIZE 360               // 360 degrees stored in table
     
    132129} ;
    133130
     131static inline void *&CAR(void *x) { return ((cons_cell *)x)->car; }
     132static inline void *&CDR(void *x) { return ((cons_cell *)x)->cdr; }
    134133
    135134void perm_space();
     
    203202extern lisp_symbol *lsym_root;
    204203
    205 extern char *space[4],*free_space[4];
     204extern uint8_t *space[4], *free_space[4];
    206205extern int space_size[4];
    207206void *nth(int num, void *list);
Note: See TracChangeset for help on using the changeset viewer.