mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-16 01:41:17 +03:00
- bug с выходом из приложения, не закрывался файловый манипулятор.
This commit is contained in:
parent
fb6c8a2caf
commit
1aa15566bf
@ -2097,7 +2097,6 @@ DIR_PATH_CHECK: LD A,(HL)
|
|||||||
;
|
;
|
||||||
.forceCheck: LD HL,CurrentDirectory+1
|
.forceCheck: LD HL,CurrentDirectory+1
|
||||||
LD BC,CurrentDirectory.DEPTH-1
|
LD BC,CurrentDirectory.DEPTH-1
|
||||||
;CALL FINDDIR.CHECK_SLASH
|
|
||||||
CALL .checkDrive
|
CALL .checkDrive
|
||||||
JR Z,.checkDir
|
JR Z,.checkDir
|
||||||
;
|
;
|
||||||
@ -2105,7 +2104,7 @@ DIR_PATH_CHECK: LD A,(HL)
|
|||||||
LD A,(FatBuffer.DRIVE)
|
LD A,(FatBuffer.DRIVE)
|
||||||
ADD 'A'
|
ADD 'A'
|
||||||
CP (HL)
|
CP (HL)
|
||||||
JP NZ,.gotoPath
|
JR NZ,.gotoPath
|
||||||
;
|
;
|
||||||
.checkDir: LD HL,CurrentDirectory+1
|
.checkDir: LD HL,CurrentDirectory+1
|
||||||
LD DE,WorkDirectory+1
|
LD DE,WorkDirectory+1
|
||||||
@ -2122,7 +2121,7 @@ DIR_PATH_CHECK: LD A,(HL)
|
|||||||
.end: CP (HL)
|
.end: CP (HL)
|
||||||
RET Z
|
RET Z
|
||||||
.ReDir: LD HL,CurrentPath
|
.ReDir: LD HL,CurrentPath
|
||||||
JP .gotoPath
|
JR .gotoPath
|
||||||
;
|
;
|
||||||
.checkDrive: LD HL,CurrentPath
|
.checkDrive: LD HL,CurrentPath
|
||||||
LD A,(FatBuffer.DRIVE)
|
LD A,(FatBuffer.DRIVE)
|
||||||
|
|||||||
@ -1046,6 +1046,10 @@ _TST_PROC:
|
|||||||
IN A,(SLOT1)
|
IN A,(SLOT1)
|
||||||
PUSH DE
|
PUSH DE
|
||||||
PUSH AF
|
PUSH AF
|
||||||
|
;!Test close EXE FM [x] 25/10/23
|
||||||
|
LD A,(EXE_FM)
|
||||||
|
PUSH AF
|
||||||
|
;
|
||||||
LD (EXSTACK),SP
|
LD (EXSTACK),SP
|
||||||
LD SP,HL
|
LD SP,HL
|
||||||
EXX
|
EXX
|
||||||
@ -1154,8 +1158,13 @@ _TST_PROC_2:
|
|||||||
LEAVE: LD A,B
|
LEAVE: LD A,B
|
||||||
LD (ERLEVEL),A
|
LD (ERLEVEL),A
|
||||||
CALL LEAVMEM
|
CALL LEAVMEM
|
||||||
CALL DECTASK
|
;CALL DECTASK ;!Test close EXE FM [x] 25/10/23
|
||||||
LD SP,(EXSTACK)
|
LD SP,(EXSTACK)
|
||||||
|
;!Test close EXE FM [x] 25/10/23
|
||||||
|
POP AF
|
||||||
|
CALL RES_FM
|
||||||
|
CALL DECTASK
|
||||||
|
;
|
||||||
POP AF
|
POP AF
|
||||||
POP HL
|
POP HL
|
||||||
OUT (SLOT1),A
|
OUT (SLOT1),A
|
||||||
|
|||||||
@ -1 +1 @@
|
|||||||
496
|
499
|
||||||
@ -1 +1 @@
|
|||||||
Subproject commit 12ce1947adb0a8d902cd6d89042fe23cb9a33c21
|
Subproject commit 9319bb78d96af2573dd54d8d2f422f2f134b5653
|
||||||
Loading…
Reference in New Issue
Block a user