aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/forth2012/double/2constant.frt
blob: 4f012d36453b3c1ba47de275e8138ff69eeede29 (plain)
1
2
3
4
5
6

: 2constant 
    create , ,
    does>
    dup 1+ @i swap @i
;