# HG changeset patch
# User boisy
# Date 1040487447 0
# Node ID 0ba32915943b580e50a92ac4e017de09efe0df64
# Parent  d2ce1c213a9cbf862177ba80cc1b23bc0147d1c5
Fixed problem where E$Param error was being returned for 6309 systems.

diff -r d2ce1c213a9c -r 0ba32915943b 3rdparty/packages/basic09/syscall.asm
--- a/3rdparty/packages/basic09/syscall.asm	Sat Dec 21 15:30:11 2002 +0000
+++ b/3rdparty/packages/basic09/syscall.asm	Sat Dec 21 16:17:27 2002 +0000
@@ -33,7 +33,8 @@
          cmpd  #$0002		two?
          bne   L005C		if not, error
          ldd   $0A,s		get size of second parameter
-         cmpd  #R$PC		appropriate registers?
+*         cmpd  #R$PC		appropriate registers?
+         cmpd  #$0A		appropriate registers?
          bne   L005C		branch if not
          ldd   [<$04,s]		get address of first parameter
          ldx   $06,s		get size of first parameter