From d417baf826b9a6eae86d4de69f149b9f105954e9 Mon Sep 17 00:00:00 2001 From: jede Date: Mon, 1 Mar 2021 23:26:35 +0100 Subject: [PATCH] Now we update __cwd --- libsrc/telestrat/initcwd.s | 3 +-- libsrc/telestrat/syschdir.s | 3 +++ 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/libsrc/telestrat/initcwd.s b/libsrc/telestrat/initcwd.s index dc3c53257..7d38dd563 100644 --- a/libsrc/telestrat/initcwd.s +++ b/libsrc/telestrat/initcwd.s @@ -10,8 +10,7 @@ initcwd: - ldx #PWD_PTR - BRK_TELEMON XVARS + BRK_TELEMON(XGETCWD) sta ptr1 sty ptr1+1 diff --git a/libsrc/telestrat/syschdir.s b/libsrc/telestrat/syschdir.s index 37ee0cc81..2437ac80e 100644 --- a/libsrc/telestrat/syschdir.s +++ b/libsrc/telestrat/syschdir.s @@ -7,6 +7,7 @@ .export __syschdir .import addysp, popax .importzp tmp1 + .import initcwd .include "telestrat.inc" .include "zeropage.inc" @@ -27,5 +28,7 @@ __syschdir: ; Call telemon primitive BRK_TELEMON(XPUTCWD) + + jsr initcwd ; Update cwd rts