Ejemplo n.º 1
0
int main(int argc, char* argv[]) {
  RUNT(init);
  RUNT(brigade);
  RUNT(buckets);
  RUNT(events);
  RUNT(tok);
  return 0;
}
Ejemplo n.º 2
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;
}
Ejemplo n.º 3
0
template<> bool RangeType<float>::isIn(Value *v,Value *item)const{
    throw RUNT("ex$range","cannot determine membership of float range");
}