Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Bdos fixes #157

Merged
merged 2 commits into from
Aug 28, 2024
Merged

Bdos fixes #157

Changes from all commits
Commits
Show all changes
2 commits
Select commit Hold shift + click to select a range
6389ef5
bdos_logindrive: return with carry set if selecting the drive fails,
ivop Aug 27, 2024
62907dc
bdos: when convert_user_fcb selects the active drive, make sure it is
ivop Aug 27, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
13 changes: 8 additions & 5 deletions src/bdos/filesystem.S
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -247,10 +247,8 @@ zproc convert_user_fcb
lda current_user
sta (param), y ; update FCB

txa ; set the active drive
sta active_drive

jmp select_active_drive
txa ; select the active drive
jmp internal_LOGINDRIVE ; and make sure it is logged in
zendproc

; --- Close a file (flush the FCB to disk) ----------------------------------
Expand Down Expand Up @@ -1314,6 +1312,9 @@ zproc internal_LOGINDRIVE

sta active_drive
jsr select_active_drive
zif_cs ; selecting drive failed, no need to go on
rts
zendif

; Decide if the drive was already logged in.

Expand All @@ -1323,7 +1324,8 @@ zproc internal_LOGINDRIVE
jsr shiftr ; flag at bottom of temp+0

ror temp+0
zif_cs
zif_cs ; already logged in
clc ; drive exists and is successfully selected
rts
zendif

Expand Down Expand Up @@ -1414,6 +1416,7 @@ zproc internal_LOGINDRIVE
zendif
zendloop

clc
rts
zendproc

Expand Down
Loading