int main(int argc, char* argv[]) { RUNT(init); RUNT(brigade); RUNT(buckets); RUNT(events); RUNT(tok); return 0; }
int SymbolType::getSymbol(const char *s){ if(strlen(s)>MAXSYMBOLLEN) throw RUNT("ex$symbol","").set("symbol too long: %s",s); int n; // unpleasant - see // https://groups.google.com/forum/#!topic/comp.programming.threads/QsJI57oQZKc WriteLock l=WL(Types::tSymbol); if(locations.find(s)){ n=locations.found(); } else { n = symbolCtr; locations.set(s,symbolCtr++); SymbolName *ss = strings.set(n); strcpy(ss->s,s); } return n; }
template<> bool RangeType<float>::isIn(Value *v,Value *item)const{ throw RUNT("ex$range","cannot determine membership of float range"); }