>From 99c6a462d165a2e5d5f8d5cd4851a2a148abfd2c Mon Sep 17 00:00:00 2001
From: Holger Hans Peter Freyther <address@hidden>
Date: Wed, 2 Feb 2011 12:50:17 +0100
Subject: [PATCH 1/3] stinst: Make the manual test work again.

2011-02-02  Holger Hans Peter Freyther  <address@hidden>

	* test.st: Use the STEvaluationDriver to parse.
---
 packages/stinst/compiler/ChangeLog |    4 ++++
 packages/stinst/compiler/test.st   |    6 +++---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/packages/stinst/compiler/ChangeLog b/packages/stinst/compiler/ChangeLog
index b075db0..234e1da 100644
--- a/packages/stinst/compiler/ChangeLog
+++ b/packages/stinst/compiler/ChangeLog
@@ -1,3 +1,7 @@
+2011-02-02  Holger Hans Peter Freyther  <address@hidden>
+
+	* test.st: Use the STEvaluationDriver to parse.
+
 2010-12-04  Paolo Bonzini  <address@hidden>
 
 	* package.xml: Remove now superfluous <file> tags.
diff --git a/packages/stinst/compiler/test.st b/packages/stinst/compiler/test.st
index 1624bad..de7dd5d 100644
--- a/packages/stinst/compiler/test.st
+++ b/packages/stinst/compiler/test.st
@@ -31,8 +31,8 @@
 
 Eval [
     PackageLoader fileInPackage: #Compiler.
-    STInST.STFileInParser 
-	parseSmalltalk: '
+
+    STInST.STEvaluationDriver new parseSmalltalk: '
    | i |
    i := ##(| a | a := -2. ''before everything'' printNl. a).
    [ i < 5 ] whileTrue:  [ i printNl. i := i + 1 ].
@@ -68,6 +68,6 @@ Arrays... and multi-line strings'') printNl.
        value: ''finally, many parameters, ''
        value: ''cascading ''
        value: ''and block temporaries too! ''.
-!'
+!' with: STInST.STFileInParser.
 ]
 
-- 
1.7.3.5