[commit] r2912 - forth/lib

[repository service]

Author: wmb
Date: Wed Mar 21 23:25:54 2012
New Revision: 2912
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2912

Log:
## Lines starting with '## ' will be removed from the log message.
## File(s) to commit recursively:
## forth/lib/decomp.fth
Decompiler - fixed oops in last checkin (indentation for "loop")

Modified:
   forth/lib/decomp.fth

Modified: forth/lib/decomp.fth
==============================================================================
--- forth/lib/decomp.fth	Wed Mar 21 23:16:33 2012	(r2911)
+++ forth/lib/decomp.fth	Wed Mar 21 23:25:54 2012	(r2912)
@@ -309,7 +309,7 @@

: .do     ( ip -- ip' )  .." do    " +indent  +branch  ;
 : .?do    ( ip -- ip' )  .." ?do   " +indent  +branch  ;
-: .loop   ( ip -- ip' )  .." loop  " cr +branch  ;
+: .loop   ( ip -- ip' )  -indent .." loop  " cr +branch  ;
 : .+loop  ( ip -- ip' )  -indent .." +loop " cr +branch  ;
 : .of     ( ip -- ip' )  .." of   " +branch  ;
 : .$of    ( ip -- ip' )  .." $of  " +branch  ;