2005-05-01 11:48:36 +00:00
|
|
|
#ifndef __SchemeObject_h
|
|
|
|
#define __SchemeObject_h
|
|
|
|
#include "Object.h"
|
|
|
|
#define true YES
|
|
|
|
#define false NO
|
2005-05-02 02:33:44 +00:00
|
|
|
#define dprintf(x, ...)
|
2005-05-06 23:25:06 +00:00
|
|
|
|
2005-05-02 02:33:44 +00:00
|
|
|
|
|
|
|
|
2005-05-01 11:48:36 +00:00
|
|
|
@interface SchemeObject: Object
|
|
|
|
{
|
2011-01-09 10:41:24 +00:00
|
|
|
@public SchemeObject []prev, next;
|
2005-05-02 02:33:44 +00:00
|
|
|
BOOL marked, root;
|
2005-05-02 04:58:22 +00:00
|
|
|
integer line;
|
|
|
|
string source;
|
2005-05-01 11:48:36 +00:00
|
|
|
}
|
2010-12-16 11:01:49 +00:00
|
|
|
+ (void) collectCheckPoint;
|
2005-05-01 11:48:36 +00:00
|
|
|
- (void) mark;
|
2005-05-02 02:33:44 +00:00
|
|
|
- (void) markReachable;
|
|
|
|
- (void) makeRootCell;
|
2005-05-01 11:48:36 +00:00
|
|
|
- (string) printForm;
|
2005-05-02 04:58:22 +00:00
|
|
|
- (string) source;
|
|
|
|
- (void) source: (string) s;
|
|
|
|
- (integer) line;
|
|
|
|
- (void) line: (integer) l;
|
|
|
|
- (BOOL) isError;
|
2005-05-01 11:48:36 +00:00
|
|
|
@end
|
|
|
|
|
|
|
|
#endif //__SchemeObject_h
|