1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-26 08:28:04 +11:00

Compare commits

..

No commits in common. "8926c33ab105f0ae9a7ad0c4c14afaf3dd0c0c07" and "e259e3d02eafd0ed4b4a172a97881a2243d37d4d" have entirely different histories.

3 changed files with 26 additions and 25 deletions

View File

@ -27,29 +27,34 @@ addDE:
noop: ; piggy backing on the first "ret" we have noop: ; piggy backing on the first "ret" we have
ret ret
; copy (HL) into DE, then exchange the two, utilising the optimised HL instructions. ; copy (DE) into DE, little endian style (addresses in z80 are always have
; ld must be done little endian, so least significant byte first. ; their LSB before their MSB)
intoDE:
push af
ld a, (de)
inc de
ex af, af'
ld a, (de)
ld d, a
ex af, af'
ld e, a
pop af
ret
intoHL: intoHL:
push de push de
ld e, (hl) ex de, hl
inc hl call intoDE
ld d, (hl)
ex de, hl ex de, hl
pop de pop de
ret ret
intoDE:
ex de, hl
call intoHL
ex de, hl ; de preserved by intoHL, so no push/pop needed
ret
intoIX: intoIX:
push ix push de
ex (sp), hl ;swap hl with ix, on the stack push ix \ pop de
call intoHL call intoDE
ex (sp), hl ;restore hl from stack push de \ pop ix
pop ix pop de
ret ret
; add the value of A into HL ; add the value of A into HL

View File

@ -1,4 +1,4 @@
#!/usr/bin/env bash #!/bin/sh
set -e set -e

View File

@ -1,11 +1,7 @@
#!/usr/bin/env bash #!/bin/sh
# readlink -f doesn't work with macOS's implementation
# so, if we can't get readlink -f to work, try python with a realpath implementation
ABS_PATH=$(readlink -f "$0" || python -c "import sys, os; print(os.path.realpath('$0'))")
# wrapper around ./emul/zasm/zasm that prepares includes CFS prior to call # wrapper around ./emul/zasm/zasm that prepares includes CFS prior to call
DIR=$(dirname "${ABS_PATH}") DIR=$(dirname $(readlink -f "$0"))
ZASMBIN="${DIR}/emul/zasm/zasm" ZASMBIN="${DIR}/emul/zasm/zasm"
CFSPACK="${DIR}/cfspack/cfspack" CFSPACK="${DIR}/cfspack/cfspack"
INCCFS=$(mktemp) INCCFS=$(mktemp)