summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/modules/scheme/driver.hpp
diff options
context:
space:
mode:
authorjsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68>2010-01-06 06:35:25 +0000
committerjsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68>2010-01-06 06:35:25 +0000
commit3a0eb8a5f2d211f88439db811ed32e23a8ce9b0b (patch)
treeaea6bd7220555857df695179296dc2552c56211f /sca-cpp/trunk/modules/scheme/driver.hpp
parent60ef14f12b5301fa7f117134044cf0716fb5ae61 (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.hpp12
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;
}