From 706ad3ff3d1548c303a76cb126baee4904a8de42 Mon Sep 17 00:00:00 2001 From: Kelvin Sherlock Date: Tue, 18 Oct 2016 13:15:11 -0400 Subject: [PATCH] open needs to return the refund... --- host.fst.aii | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/host.fst.aii b/host.fst.aii index fa0307e..650106f 100644 --- a/host.fst.aii +++ b/host.fst.aii @@ -1049,6 +1049,12 @@ open proc ldy #fcr.vcr_id sta [my_fcr],y + ; store the refnum for output. + ; conveniently, call_class is the offset. + lda [my_fcr] + ldy call_class + sta [param_blk_ptr],y + exit_ok lda #0 clc