The following code in the listener triggered this error message :
"You have found a bug in locals. Please report.
args [ ]
obj  other"

: move ( i j -- ) "moving from %d to %d\n" printf ;
:: other ( i j -- k ) 6 i j + - ;
:: hanoi ( h i j -- )
h 1 = [
  i j move
] [
  h 1 - :> h'
  i j other :> k
  h' i k hanoi
  i j move
  h' k j hanoi
] if ;

Replacing "i j other" by "6 i j + -" in hanoi removes the bug.
Let me know if you need more information.
Cheers,
Jon Harper

------------------------------------------------------------------------------
The Planet: dedicated and managed hosting, cloud storage, colocation
Stay online with enterprise data centers and the best network in the business
Choose flexible plans and management services without long-term contracts
Personal 24x7 support from experience hosting pros just a phone call away.
http://p.sf.net/sfu/theplanet-com
_______________________________________________
Factor-talk mailing list
Factor-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/factor-talk

Reply via email to