I tried entering this as Forth code and got the same result. Not sure what changes you mean (since you define pushee and popee). Also, I don't think the list took your attachment.
I presume this is broken because of the changes to here and dp recently. Anyway, for now I'm sticking with a hybrid 3.8 -- I did take some of the device and driver stuff out of 4.1 and got it working with 3.8. On Wednesday, September 15, 2010 16:59:25 pm Kalus Michael wrote: > Hi. > > > Am 15.09.2010 um 21:24 schrieb Al Williams: > .. > > > Any ideas on getting marker to work? > > maybe this version works. It copies the _entire_ system vector to > flash, and pops it back when executing the marker word. > > : pushee ( -- ) dp , here , edp , edp 8 do i e@ , 2 +loop ; > : popee ( adr n -- ) 0 do dup i + i@ i 2* 2 + e! loop drop ; > : marker ( -- ) > > edp >r dp >r > pushee create r> , r> , > does> >r r@ i@ r> 1+ i@ popee ; > > I append marker.asm, include it in your application words if you like. > BUT since it was written for amforth-3.6 on atmega168 you have to do > the changes mentioned in the file. (pushee has been called ,ee there.) > > Michael ------------------------------------------------------------------------------ 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 Amforth-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/amforth-devel
