comparison mc.h @ 731:1f6e34c4dbbf

INTEL64 (start)
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Fri, 29 Oct 2010 16:14:00 +0900
parents 21f770a3b298
children a177c65f3e37
comparison
equal deleted inserted replaced
730:9bad72e27174 731:1f6e34c4dbbf
590 // mc-tree.c 590 // mc-tree.c
591 591
592 extern void print_expr(int e, FILE *vout); 592 extern void print_expr(int e, FILE *vout);
593 593
594 594
595 #if 1 595 // #if 1
596 extern int heapsize; 596 //extern int heapsize;
597 #define CHECK_HEAP(b) ({int _k=(int)(b);if(_k>heapsize||_k<=0)error(-1);_k;}) 597 // #define CHECK_HEAP1(b) ({int _k=(int)(b);if(_k>heapsize||_k<=0)error(-1);_k;})
598 #else 598 //#else
599 #define CHECK_HEAP(b) (b) 599 #define CHECK_HEAP(b) (b)
600 #endif 600 //#endif
601 601
602 #define car(e) (heap[(int)(CHECK_HEAP(e))]) 602 #define car(e) (heap[(int)(CHECK_HEAP(e))])
603 603
604 #define cadr(e) (heap[((int)(CHECK_HEAP(e)))+1]) 604 #define cadr(e) (heap[((int)(CHECK_HEAP(e)))+1])
605 605