$include_dir="/home/hyper-archives/boost-commit/include"; include("$include_dir/msg-header.inc") ?>
Subject: [Boost-commit] svn:boost r61317 - in trunk/libs/spirit/example/scheme: input test/scheme
From: joel_at_[hidden]
Date: 2010-04-16 09:26:46
Author: djowel
Date: 2010-04-16 09:26:45 EDT (Fri, 16 Apr 2010)
New Revision: 61317
URL: http://svn.boost.org/trac/boost/changeset/61317
Log:
fixed bug.
Text files modified: 
   trunk/libs/spirit/example/scheme/input/sexpr.hpp              |     6 +++---                                  
   trunk/libs/spirit/example/scheme/test/scheme/scheme_test1.scm |     2 +-                                      
   2 files changed, 4 insertions(+), 4 deletions(-)
Modified: trunk/libs/spirit/example/scheme/input/sexpr.hpp
==============================================================================
--- trunk/libs/spirit/example/scheme/input/sexpr.hpp	(original)
+++ trunk/libs/spirit/example/scheme/input/sexpr.hpp	2010-04-16 09:26:45 EDT (Fri, 16 Apr 2010)
@@ -123,12 +123,12 @@
             struct result { typedef void type; };
 
             void operator()(
-                Iterator first, Iterator err_pos,
-                Iterator last, info const& what) const
+                Iterator first, Iterator last,
+                Iterator err_pos, info const& what) const
             {
                 if (!errorf.empty())
                 {
-                    errorf(first, err_pos, last, what);
+                    errorf(first, last, err_pos, what);
                 }
                 else
                 {
Modified: trunk/libs/spirit/example/scheme/test/scheme/scheme_test1.scm
==============================================================================
--- trunk/libs/spirit/example/scheme/test/scheme/scheme_test1.scm	(original)
+++ trunk/libs/spirit/example/scheme/test/scheme/scheme_test1.scm	2010-04-16 09:26:45 EDT (Fri, 16 Apr 2010)
@@ -10,7 +10,7 @@
 ; The hello-world for interpreters ;-)
 (define (factorial n)
   (if (<= n 0) 1
-    (* n (factorial (- n 1))))
+    (* n (factorial (- n 1)))))
 
 (factorial 10) ; 3628800