|
|
1.1 root 1: #define chkrtab(p); \
2: if(p!=lastrtab){ if(TYPE(p)!=ARRAY && TYPE(p->data)!=INT) rtaberr();\
3: else { lastrtab = p; ctable = p->data; } }
4: extern lispval lastrtab;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.