Euler benchmarks were leaving junk on the stack

diff --git a/extra/benchmark/euler150/euler150.factor b/extra/benchmark/euler150/euler150.factor
index 5ee7c57e17cf6690d4ea967e71ea07185428b72b..448c8575f9dd666342e5c4ed7520967a94741113 100644 (file)
--- a/extra/benchmark/euler150/euler150.factor
+++ b/extra/benchmark/euler150/euler150.factor
@@ -1,4 +1,7 @@
 IN: benchmark.euler150
-USE: project-euler.150
+USING: kernel project-euler.150 ;
 
-MAIN: euler150
+: euler150-benchmark ( -- )
+    euler150 -271248680 assert= ;
+
+MAIN: euler150-benchmark

diff --git a/extra/benchmark/euler186/euler186.factor b/extra/benchmark/euler186/euler186.factor
index 1124c8807c7b96a1344b72ba0c5b6d61142c7b70..344b9229027cdbb7e37baf8228c5372a494caa50 100644 (file)
--- a/extra/benchmark/euler186/euler186.factor
+++ b/extra/benchmark/euler186/euler186.factor
@@ -1,4 +1,5 @@
 IN: benchmark.euler186
-USE: project-euler.186
+USING: kernel project-euler.186 ;
 
-MAIN: euler186
+: euler186-benchmark ( -- )
+    euler186 2325629 assert= ;