diff --git a/PLASMA-SYS2.PO b/PLASMA-SYS2.PO index ff29a2a..9d3049a 100755 Binary files a/PLASMA-SYS2.PO and b/PLASMA-SYS2.PO differ diff --git a/src/vmsrc/apple/cmd.pla b/src/vmsrc/apple/cmd.pla index 8f56fac..28125ba 100755 --- a/src/vmsrc/apple/cmd.pla +++ b/src/vmsrc/apple/cmd.pla @@ -1398,7 +1398,7 @@ loop // // Set system path // -strcat(strcpy(@sysmods, $280), "SYS/")) // This is the path to CMD +strcat(strcpy(@sysmods, $300), "SYS/")) // This is the path to CMD syspath = @sysmods // Update external interface table syscmdln = @cmdln // diff --git a/src/vmsrc/apple/cmdjit.pla b/src/vmsrc/apple/cmdjit.pla index 6568fb4..1c347f2 100755 --- a/src/vmsrc/apple/cmdjit.pla +++ b/src/vmsrc/apple/cmdjit.pla @@ -41,7 +41,7 @@ end // const jitcomp = $03E2 const jitcodeptr = $03E4 -const jitmod = $02E0 +const jitmod = $02F0 // // Pedefined functions. // @@ -1469,7 +1469,7 @@ loop // // Set system path // -strcat(strcpy(@sysmods, $280), "SYS/")) // This is the path to CMD +strcat(strcpy(@sysmods, $300), "SYS/")) // This is the path to CMD syspath = @sysmods // Update external interface table syscmdln = @cmdln // diff --git a/src/vmsrc/apple/plvm02.s b/src/vmsrc/apple/plvm02.s index 6df5f81..b612b8e 100755 --- a/src/vmsrc/apple/plvm02.s +++ b/src/vmsrc/apple/plvm02.s @@ -38,7 +38,7 @@ IPL = IP IPH = IPL+1 OPIDX = FETCHOP+6 OPPAGE = OPIDX+1 -STRBUF = $0280 +STRBUF = $0300 INTERP = $03D0 ;****************************** ;* * diff --git a/src/vmsrc/apple/plvm802.s b/src/vmsrc/apple/plvm802.s index 3fa5ee2..7c06a2a 100644 --- a/src/vmsrc/apple/plvm802.s +++ b/src/vmsrc/apple/plvm802.s @@ -63,8 +63,8 @@ OPPAGE = OPIDX+1 ; ; BUFFER ADDRESSES ; -STRBUF = $0280 -JITMOD = $02E0 +STRBUF = $0300 +JITMOD = $02F0 INTERP = $03D0 JITCOMP = $03E2 JITCODE = $03E4 diff --git a/src/vmsrc/apple/plvmjit02.s b/src/vmsrc/apple/plvmjit02.s index 9c05eab..6f107e0 100755 --- a/src/vmsrc/apple/plvmjit02.s +++ b/src/vmsrc/apple/plvmjit02.s @@ -50,8 +50,8 @@ IPL = IP IPH = IPL+1 OPIDX = FETCHOP+6 OPPAGE = OPIDX+1 -STRBUF = $0280 -JITMOD = $02E0 +STRBUF = $0300 +JITMOD = $02F0 INTERP = $03D0 JITCOMP = $03E2 JITCODE = $03E4