]> gitweb.factorcode.org Git - factor.git/commitdiff
fix compile error
authorDoug Coleman <erg@jobim.local>
Mon, 30 Mar 2009 02:39:21 +0000 (21:39 -0500)
committerDoug Coleman <erg@jobim.local>
Mon, 30 Mar 2009 02:39:21 +0000 (21:39 -0500)
extra/bank/bank.factor

index 25843356721166a3dbda212c5ddb9091f874ae02..f06bc2fb81f4dc00f14668c83b47cec7dc0eeb44 100644 (file)
@@ -59,11 +59,11 @@ C: <transaction> transaction
         [ dup [ over [ swap call ] dip ] dip 1 days time+ ] dip each-day
     ] [
         3drop
-    ] if ; inline
+    ] if ; inline recursive
 
 : process-to-date ( account date -- account )
     over interest-last-paid>> 1 days time+
-    [ dupd process-day ] spin each-day ;
+    [ dupd process-day ] spin each-day ; inline
 
 : inserting-transactions ( account transactions -- account )
     [ [ date>> process-to-date ] keep >>transaction ] each ;