42434445464748495051
* @see net.sf.kpex.prolog.FunBuiltin#exec(net.sf.kpex.prolog.Prog) */ @Override public int exec(Prog p) { DataBase db = (DataBase) ((JavaObject) getArg(0)).toObject(); Term X = getArg(1); Term R = db.cin(X.getKey(), X); return putArg(2, R, p); }
424344454647484950
* @see net.sf.kpex.prolog.FunBuiltin#exec(net.sf.kpex.prolog.Prog) */ @Override public int exec(Prog p) { DataBase db = (DataBase) ((JavaObject) getArg(0)).toObject(); Source S = new JavaSource(db.iterateAll(), p); return putArg(1, S, p); }
44454647484950515253
* @see net.sf.kpex.prolog.FunBuiltin#exec(net.sf.kpex.prolog.Prog) */ @Override public int exec(Prog p) { DataBase db = (DataBase) ((JavaObject) getArg(0)).toObject(); Term X = getArg(1); Term R = db.all(X.getKey(), X); return putArg(2, R, p); }
39404142434445
* @see net.sf.kpex.prolog.FunBuiltin#exec(net.sf.kpex.prolog.Prog) */ @Override public int exec(Prog p) { return putArg(0, new JavaObject<DataBase>(new DataBase()), p); }
414243444546474849505152535455565758
* @see net.sf.kpex.prolog.FunBuiltin#exec(net.sf.kpex.prolog.Prog) */ @Override public int exec(Prog p) { DataBase db = (DataBase) ((JavaObject) getArg(0)).toObject(); Term X = getArg(1); // IO.mes("X==>"+X); String key = X.getKey(); // IO.mes("key==>"+key); if (null == key) { return 0; } db.out(key, X); // IO.mes("res==>"+R); return 1; }