mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 17:31:47 +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
|
||||
LD BC,CurrentDirectory.DEPTH-1
|
||||
;CALL FINDDIR.CHECK_SLASH
|
||||
CALL .checkDrive
|
||||
JR Z,.checkDir
|
||||
;
|
||||
@ -2105,7 +2104,7 @@ DIR_PATH_CHECK: LD A,(HL)
|
||||
LD A,(FatBuffer.DRIVE)
|
||||
ADD 'A'
|
||||
CP (HL)
|
||||
JP NZ,.gotoPath
|
||||
JR NZ,.gotoPath
|
||||
;
|
||||
.checkDir: LD HL,CurrentDirectory+1
|
||||
LD DE,WorkDirectory+1
|
||||
@ -2122,7 +2121,7 @@ DIR_PATH_CHECK: LD A,(HL)
|
||||
.end: CP (HL)
|
||||
RET Z
|
||||
.ReDir: LD HL,CurrentPath
|
||||
JP .gotoPath
|
||||
JR .gotoPath
|
||||
;
|
||||
.checkDrive: LD HL,CurrentPath
|
||||
LD A,(FatBuffer.DRIVE)
|
||||
|
||||
@ -1046,6 +1046,10 @@ _TST_PROC:
|
||||
IN A,(SLOT1)
|
||||
PUSH DE
|
||||
PUSH AF
|
||||
;!Test close EXE FM [x] 25/10/23
|
||||
LD A,(EXE_FM)
|
||||
PUSH AF
|
||||
;
|
||||
LD (EXSTACK),SP
|
||||
LD SP,HL
|
||||
EXX
|
||||
@ -1154,8 +1158,13 @@ _TST_PROC_2:
|
||||
LEAVE: LD A,B
|
||||
LD (ERLEVEL),A
|
||||
CALL LEAVMEM
|
||||
CALL DECTASK
|
||||
;CALL DECTASK ;!Test close EXE FM [x] 25/10/23
|
||||
LD SP,(EXSTACK)
|
||||
;!Test close EXE FM [x] 25/10/23
|
||||
POP AF
|
||||
CALL RES_FM
|
||||
CALL DECTASK
|
||||
;
|
||||
POP AF
|
||||
POP HL
|
||||
OUT (SLOT1),A
|
||||
|
||||
@ -1 +1 @@
|
||||
496
|
||||
499
|
||||
@ -1 +1 @@
|
||||
Subproject commit 12ce1947adb0a8d902cd6d89042fe23cb9a33c21
|
||||
Subproject commit 9319bb78d96af2573dd54d8d2f422f2f134b5653
|
||||
Loading…
Reference in New Issue
Block a user