russell: C:/Users/Dennis/src/lang/russell.orig/src/stree/is

00001 extern end;
00002 
00003 # ifdef RT
00004 #   define is_ptr(x) ( ((unsigned) (x)) == 0 || (((unsigned) (x)) >= 0x10000000 \
00005                                                  && ((unsigned) (x)) <= 0x20000000\
00006                                                  && (((unsigned)(x)) & 1) == 0 ) )
00007 # else
00008 #   define is_ptr(x) ( ((unsigned) (x)) == 0 || (((unsigned) (x)) >= ((unsigned) &end) \
00009                                                  && ((unsigned) (x)) <= 0x10000000\
00010                                                  && (((unsigned)(x)) & 1) == 0 ) )
00011 # endif
00012 
00013

C:/Users/Dennis/src/lang/russell.orig/src/stree/is_ptr.h