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.
601 Commits
4 Branches
13MB
Tree: 9ab292a6d5
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '9ab292a6d5'
${ noResults }
collapseos/tools/tests/unit/test_lib_ari.asm

36 lines
279B
Raw Blame History 

  1. jp	test

  2. 

  3. .inc "core.asm"

  4. .inc "lib/ari.asm"

  5. 

  6. testNum:	.db 1

  7. 

  8. test:

  9. 	ld	sp, 0xffff

  10. 

  11. 	ld	de, 12

  12. 	ld	bc, 4

  13. 	call	multDEBC

  14. 	ld	a, l

  15. 	cp	48

  16. 	jp	nz, fail

  17. 	call	nexttest

  18. 

  19. 	; success

  20. 	xor	a

  21. 	halt

  22. 

  23. nexttest:

  24. 	ld	a, (testNum)

  25. 	inc	a

  26. 	ld	(testNum), a

  27. 	ret

  28. 

  29. fail:

  30. 	ld	a, (testNum)

  31. 	halt

  32. 

  33. 

  34.