aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/uless.asm
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/avr8/words/uless.asm')
-rw-r--r--amforth-6.5/avr8/words/uless.asm18
1 files changed, 0 insertions, 18 deletions
diff --git a/amforth-6.5/avr8/words/uless.asm b/amforth-6.5/avr8/words/uless.asm
deleted file mode 100644
index 69d5a6b..0000000
--- a/amforth-6.5/avr8/words/uless.asm
+++ /dev/null
@@ -1,18 +0,0 @@
-; ( u1 u2 -- flasg)
-; Compare
-; true if u1 < u2 (unsigned)
-VE_ULESS:
- .dw $ff02
- .db "u<"
- .dw VE_HEAD
- .set VE_HEAD = VE_ULESS
-XT_ULESS:
- .dw PFA_ULESS
-PFA_ULESS:
- ld temp2, Y+
- ld temp3, Y+
- cp tosl, temp2
- cpc tosh, temp3
- brlo PFA_ZERO1
- brbs 1, PFA_ZERO1
- jmp_ PFA_TRUE1