summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/test
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--sca-cpp/trunk/test/store-script/Makefile.am2
-rw-r--r--sca-cpp/trunk/test/store-script/store-script-test.cpp18
2 files changed, 10 insertions, 10 deletions
diff --git a/sca-cpp/trunk/test/store-script/Makefile.am b/sca-cpp/trunk/test/store-script/Makefile.am
index 7e8413ba91..fc6a1f88fb 100644
--- a/sca-cpp/trunk/test/store-script/Makefile.am
+++ b/sca-cpp/trunk/test/store-script/Makefile.am
@@ -17,7 +17,7 @@
noinst_PROGRAMS = store-script-test
-INCLUDES = -I. -I$(top_builddir)/kernel -I$(top_builddir)/modules/eval -I${LIBXML2_INCLUDE} -I${APR_INCLUDE} -I${JS_INCLUDE}
+INCLUDES = -I. -I$(top_builddir)/kernel -I${LIBXML2_INCLUDE} -I${APR_INCLUDE} -I${JS_INCLUDE}
store_script_test_SOURCES = store-script-test.cpp
store_script_test_LDADD = -L${LIBXML2_LIB} -lxml2 -L${APR_LIB} -lapr-1 -laprutil-1 -L${JS_LIB} -lmozjs
diff --git a/sca-cpp/trunk/test/store-script/store-script-test.cpp b/sca-cpp/trunk/test/store-script/store-script-test.cpp
index a85b661b43..05aefcaf8c 100644
--- a/sca-cpp/trunk/test/store-script/store-script-test.cpp
+++ b/sca-cpp/trunk/test/store-script/store-script-test.cpp
@@ -28,9 +28,9 @@
#include "stream.hpp"
#include "string.hpp"
#include "list.hpp"
-#include "driver.hpp"
#include "xml.hpp"
-#include "../json/json.hpp"
+#include "../../modules/scheme/driver.hpp"
+#include "../../modules/json/json.hpp"
namespace store {
@@ -41,7 +41,7 @@ bool testScript() {
ifstream is("store-script.scm");
ostringstream os;
- eval::evalDriverRun(is, os, pool);
+ scheme::evalDriverRun(is, os, pool);
assert(contains(str(os), "(\"Sample Feed\" \""));
assert(contains(str(os), "\" (\"Item\" \""));
assert(contains(str(os), "\" ((javaClass \"services.Item\") (name \"Orange\") (currencyCode \"USD\") (currencySymbol \"$\") (price 3.55))) (\"Item\" \""));
@@ -54,10 +54,10 @@ bool testEval() {
gc_scoped_pool pool;
ifstream is("store-script.scm");
ostringstream os;
- eval::setupDisplay(os);
- eval::Env globalEnv = eval::setupEnvironment(pool);
+ scheme::setupDisplay(os);
+ scheme::Env globalEnv = scheme::setupEnvironment(pool);
const value exp(mklist<value>("storeui_service", string("getcatalog")));
- const value val = eval::evalScript(exp, is, globalEnv, pool);
+ const value val = scheme::evalScript(exp, is, globalEnv, pool);
ostringstream vs;
vs << val;
@@ -68,11 +68,11 @@ bool testEval() {
gc_scoped_pool pool;
ifstream is("store-script.scm");
ostringstream os;
- eval::setupDisplay(os);
+ scheme::setupDisplay(os);
- eval::Env globalEnv = eval::setupEnvironment(pool);
+ scheme::Env globalEnv = scheme::setupEnvironment(pool);
const value exp(mklist<value>("storeui_service", string("gettotal")));
- const value res = eval::evalScript(exp, is, globalEnv, pool);
+ const value res = scheme::evalScript(exp, is, globalEnv, pool);
ostringstream rs;
rs << res;