Hello,

On 04/22/2014 09:27 PM, Erich Waelde wrote:
> Hello,
> 
> it may well be me being stupid...
> 
> building clean amforth-5.2 from releases/5.2/appl/template
> add "words/1ms.asm" to dict_appl.inc
> fix template.asm for atmega32.asm
> loading lib/bitnames.frt and core/devices/atmega32/atmega32.frt
> 
> The following code produces a reset at calling " key? ".
> 
> PORTB 0 portpin: led0
> : init  led0 pin_output led0 high ;
> : ms  0 ?do 1ms loop ;
> : once led0 low &200 ms led0 high &800 ms ;
> : run  init  begin once key? until ;
> 
> 
> 
>> ver
> amforth 5.2 ATmega32 ok
>> PORTB 0 portpin: led0
>  ok
>> : init  led0 pin_output led0 high ;
>  ok
>> decimal
>  ok
>> : ms  0 ?do 1ms loop ;
>  ok
>> : once led0 low &200 ms led0 high &800 ms ;
>  ok
>> : run  init  begin once key? until ;
>  ok
>> run
> amforth 5.2 ATmega32

I did some more experiments, since this code used to work.
It works in amforth 4.9, 5.0
It fails in amforth 5.1. 5.2
so some change broke it, it seems to me.

And no, I don't use amforth-shell.py. I use 
minicom -wo -b 115200 -D /dev/ttyUSB0
or similar.


Cheers,
Erich


------------------------------------------------------------------------------
Start Your Social Network Today - Download eXo Platform
Build your Enterprise Intranet with eXo Platform Software
Java Based Open Source Intranet - Social, Extensible, Cloud Ready
Get Started Now And Turn Your Intranet Into A Collaboration Platform
http://p.sf.net/sfu/ExoPlatform
_______________________________________________
Amforth-devel mailing list for http://amforth.sf.net/
Amforth-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to