> Some of us like to load them at forth source
> level, use <device>.frt  
> to do so.

But:
116 regs in device.inc <> 153 in device.frt (for 1284p)

> > why it defines words as variables when those are
> > constants?
Ahaa so:
; ( -- addr ) System Constant
; R( -- )
; ADC Data Register High Byte
VE_ADCH:
.dw $ff04
.db "ADCH"
.dw VE_HEAD
.set VE_HEAD=VE_ADCH
XT_ADCH:
.dw PFA_DOVARIABLE
PFA_ADCH:
.dw $79

is equal to this definition as well:

79 constant ADCH        \ ADC Data Register High Byte

For me ADCH is constant which contains the address of the register.
That is the trick..
Thanks, Pito


------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing.
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
Amforth-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to