aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/u-2slash.frt
blob: 3f36bb5fcb826a1b669837d073b5843eb3d53047 (plain)
1
2
3
4
5
6
7

\ unsigned division by 2.
\ -1 u2/ . gives 32737
\ -1 2/ .  gives -1
\ -1 2 / . gives 0

: u2/ 1 rshift ;