diff options
author | jsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68> | 2010-01-06 06:35:25 +0000 |
---|---|---|
committer | jsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68> | 2010-01-06 06:35:25 +0000 |
commit | 3a0eb8a5f2d211f88439db811ed32e23a8ce9b0b (patch) | |
tree | aea6bd7220555857df695179296dc2552c56211f /sca-cpp/trunk/modules/scheme/driver.hpp | |
parent | 60ef14f12b5301fa7f117134044cf0716fb5ae61 (diff) |
Minor cleanup, removed unnecessary references to GC pools.
git-svn-id: http://svn.us.apache.org/repos/asf/tuscany@896327 13f79535-47bb-0310-9956-ffa450edef68
Diffstat (limited to 'sca-cpp/trunk/modules/scheme/driver.hpp')
-rw-r--r-- | sca-cpp/trunk/modules/scheme/driver.hpp | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/sca-cpp/trunk/modules/scheme/driver.hpp b/sca-cpp/trunk/modules/scheme/driver.hpp index 629a561453..112c226ed1 100644 --- a/sca-cpp/trunk/modules/scheme/driver.hpp +++ b/sca-cpp/trunk/modules/scheme/driver.hpp @@ -53,21 +53,21 @@ const bool userPrint(const value val, ostream& out) { return true; } -const value evalDriverLoop(istream& in, ostream& out, Env& env, const gc_pool& pool) { +const value evalDriverLoop(istream& in, ostream& out, Env& env) { promptForInput(evalInputPrompt, out); value input = readValue(in); if (isNil(input)) return input; - const value output = evalExpr(input, env, pool); + const value output = evalExpr(input, env); announceOutput(evalOutputPrompt, out); userPrint(output, out); - return evalDriverLoop(in, out, env, pool); + return evalDriverLoop(in, out, env); } -const bool evalDriverRun(istream& in, ostream& out, const gc_pool& pool) { +const bool evalDriverRun(istream& in, ostream& out) { setupDisplay(out); - Env globalEnv = setupEnvironment(pool); - evalDriverLoop(in, out, globalEnv, pool); + Env env = setupEnvironment(); + evalDriverLoop(in, out, env); return true; } |