izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
1
Fork 0
Code Issues 0 Releases 0 Wiki Activity
Mirror of CollapseOS
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
850 Commits
4 Branches
13MB
Tree: da9f9f9899
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'da9f9f9899'
${ noResults }
collapseos/tests/unit/test_ed_util.asm

43 lines
413B
Raw Blame History 

  1. jp	test

  2. 

  3. .inc "ed/util.asm"

  4. 

  5. test:

  6. 	ld	sp, 0xffff

  7. 

  8. 	; *** cpHLDE ***

  9. 	ld	hl, 0x42

  10. 	ld	de, 0x42

  11. 	call	cpHLDE

  12. 	jp	nz, fail

  13. 	jp	c, fail

  14. 	call	nexttest

  15. 

  16. 	ld	de, 0x4242

  17. 	call	cpHLDE

  18. 	jp	z, fail

  19. 	jp	nc, fail

  20. 	call	nexttest

  21. 

  22. 	ld	hl, 0x4243

  23. 	call	cpHLDE

  24. 	jp	z, fail

  25. 	jp	c, fail

  26. 	call	nexttest

  27. 

  28. 	; success

  29. 	xor	a

  30. 	halt

  31. 

  32. testNum:	.db 1

  33. 

  34. nexttest:

  35. 	ld	a, (testNum)

  36. 	inc	a

  37. 	ld	(testNum), a

  38. 	ret

  39. 

  40. fail:

  41. 	ld	a, (testNum)

  42. 	halt