diff options
author | Teddy <ted.sybil@gmail.com> | 2013-08-14 21:43:41 +0800 |
---|---|---|
committer | Teddy <ted.sybil@gmail.com> | 2013-08-14 21:43:41 +0800 |
commit | 640a20d0b6a2137617b7f217defce7979338e289 (patch) | |
tree | 30219b26cd538b08e5313978a9133c4e4248a3fe /types.cpp | |
parent | 2bb741508a93335b94adfabf3631abd39b8c6e8a (diff) |
removed redundant info
Diffstat (limited to 'types.cpp')
-rw-r--r-- | types.cpp | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -57,14 +57,14 @@ SymObj::SymObj(const string &str) : return new ReprStr(val); } -OptObj::OptObj(Environment *_envt, int otype) : - Container(otype | CLS_SIM_OBJ | CLS_OPT_OBJ, true), envt(_envt) {} +OptObj::OptObj(int otype) : + Container(otype | CLS_SIM_OBJ | CLS_OPT_OBJ, true) {} void OptObj::gc_decrement() {} void OptObj::gc_trigger(EvalObj ** &tail, EvalObjSet &visited) {} ProcObj::ProcObj(Pair *_body, Environment *_envt, EvalObj *_params) : - OptObj(_envt, CLS_CONTAINER), body(_body), params(_params) { + OptObj(CLS_CONTAINER), body(_body), params(_params), envt(_envt) { gc.attach(body); gc.attach(params); gc.attach(envt); @@ -148,7 +148,7 @@ ReprCons *ProcObj::get_repr_cons() { return new ReprStr("#<Procedure>"); } -SpecialOptObj::SpecialOptObj(Environment *envt, string _name) : OptObj(envt), name(_name) {} +SpecialOptObj::SpecialOptObj(string _name) : OptObj(), name(_name) {} ReprCons *SpecialOptObj::get_repr_cons() { return new ReprStr("#<Built-in Opt: " + name + ">"); } @@ -293,8 +293,8 @@ bool StrObj::eq(StrObj *r) { return str == r->str; } -BuiltinProcObj::BuiltinProcObj(Environment *envt, BuiltinProc f, string _name) : - OptObj(envt), handler(f), name(_name) {} +BuiltinProcObj::BuiltinProcObj(BuiltinProc f, string _name) : + OptObj(), handler(f), name(_name) {} Pair *BuiltinProcObj::call(Pair *args, Environment * &lenvt, Continuation * &cont, EvalObj ** &top_ptr) { |