aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/cells.asm
blob: 2876c2ddf13efb69f6ce16d13d7ffdf93f93deae (plain)
1
2
3
4
5
6
7
8
9
10
; ( n1 -- n2 ) 
; Arithmetics
; n2 is the size in address units of n1 cells
VE_CELLS:
    .dw $ff05
    .db "cells",0
    .dw VE_HEAD
    .set VE_HEAD = VE_CELLS
XT_CELLS:
    .dw PFA_2STAR