From d80736ab6e8e3cad2f1a30c6eaba2d6883dbe967 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Sat, 26 Aug 2017 20:31:40 +0200 Subject: Remove AmForth --- amforth-6.5/msp430/words/uinit.asm | 39 -------------------------------------- 1 file changed, 39 deletions(-) delete mode 100644 amforth-6.5/msp430/words/uinit.asm (limited to 'amforth-6.5/msp430/words/uinit.asm') diff --git a/amforth-6.5/msp430/words/uinit.asm b/amforth-6.5/msp430/words/uinit.asm deleted file mode 100644 index eb4c058..0000000 --- a/amforth-6.5/msp430/words/uinit.asm +++ /dev/null @@ -1,39 +0,0 @@ -;Z uinit -- addr initial values for user area -; MSP430: we also use this to initialize the RAM interrupt -; vectors, which immediately follow the user area. -; Per init430f1611.s43, allocate 16 cells for user -; variables, followed by 30 cells for interrupt vectors. - HEADER(XT_UINIT,5,"uinit",DOROM) -; CFG Area - DW 2,XT_REC_FIND,XT_REC_NUM,0,0 - DW 1,CFG_FORTHWID,0,0,0,0,0,0,0 - DW XT_APPLTURNKEY ; TURNKEY vector - DW RAMDICT ; HERE / DP - DW ROMDICT ; IHERE / IDP - DW INFODICT ; INFOHERE / INFODP - DW CFG_FORTHWID ; CURRENT - DW lastword ; FORTH WID - DW lastenv ; environment WID - DW XT_GET_CURRENT ; wlscope - DW CFG_RECOGNIZERLISTLEN ; FORTH-RECOGNIZER - -.if WANT_INTERRUPTS==1 - DW XT_NOOP,XT_NOOP,XT_NOOP,XT_NOOP,XT_NOOP - DW XT_NOOP,XT_NOOP,XT_NOOP,XT_NOOP,XT_NOOP -.endif - -; USER Area - DW 0,0 ; STATE/FOLLOWER - DW 0,0,0 ; RP,SP0, SP - DW 0 ; HANDLER - DW 10 ; BASE - DW XT_USART_TX_POLL - DW XT_USART_TXQ_POLL - DW XT_USART_RX_POLL - DW XT_USART_RXQ_POLL - DW XT_SOURCETIB - DW 0 ; >IN - DW XT_REFILLTIB - DW XT_DEFAULT_PROMPTOK - DW XT_DEFAULT_PROMPTERROR - DW XT_DEFAULT_PROMPTREADY -- cgit v1.2.3