Could this be it?

src/libsrc/longjmp.pla

@@ -20,8 +20,6 @@ export asm except(env)
         TSX
         STX     TMPL
         LDY     TMPL
-        LDA     IPX         ; APPLE 3-ISM
-        STA     TMPH
 -       LDA     $0100,Y
         STA     (SRC),Y
         INY
@@ -60,8 +58,6 @@ export asm throw(env, retval)
         INX
         BNE     -
         DEC     DST+1
-        LDA     TMPH        ; APPLE 3-ISM
-        STA     IPX
         LDX     TMPL
         TXS
         LDY     TMPL

src/toolsrc/ed.pla

@@ -315,12 +315,13 @@ end
 //
 // File routines
 //
-def readtxt(filename)#0
+def readtxt(filename, startline)#0
     byte txtbuf[81], refnum, i, j
 
     refnum = fileio:open(filename)
     if refnum
         fileio:newline(refnum, $7F, $0D)
+        numlines = startline
         repeat
             txtbuf = fileio:read(refnum, @txtbuf + 1, MAXLNLEN)
             if txtbuf
@@ -1065,16 +1066,14 @@ def cmdmode#0
         cmdptr = gets($BA)
         when toupper(parsecmd(cmdptr))
             is 'A'
-                readtxt(cmdptr)
+                readtxt(cmdptr, numlines)
                 flags = flags | changed
                 break
             is 'R'
                 if chkchng
                     inittxtbuf
-                    numlines = 0
                     strstripcpy(@filename, cmdptr)
-                    readtxt(@filename)
-                    if numlines == 0; numlines = 1; fin
+                    readtxt(@filename, 0)
                     flags = flags & ~changed
                 fin
                 break
@@ -1135,8 +1134,7 @@ arg = argNext(argFirst)
 if ^arg
     strcpy(@filename, arg)
     puts(@filename)
-    numlines = 0
-    readtxt(@filename)
+    readtxt(@filename, 0)
 fin
 curschr  = '+'
 flags    = flags | insmode

src/toolsrc/plasm.pla

@@ -386,7 +386,10 @@ def exit_err(err)#0
     if err & ERR_TABLE;  puts("table");       fin
     if err & ERR_SYNTAX; puts("syntax");      fin
     putcurln
-    fileio:close(0) // Close all open files
+    if incref
+        fileio:close(incref) // Close include file if open
+    fin
+    fileio:close(srcref) // Close source file
     throw(exit, TRUE)
 end
 //

src/vmsrc/cmd.pla

@@ -1433,7 +1433,7 @@ heap = *freemem
 //
 // Print PLASMA version
 //
-prstr("PLASMA Pre3 "); prbyte(version.1); cout('.'); prbyte(version.0); crout
+prstr("PLASMA "); prbyte(version.1); cout('.'); prbyte(version.0); crout
 //
 // Init symbol table.
 //

src/vmsrc/soscmd.pla

@@ -1441,7 +1441,7 @@ init_cons
 //
 // Print PLASMA version
 //
-prstr("PLASMA Pre4 "); prbyte(version.1); cout('.'); prbyte(version.0); crout
+prstr("PLASMA "); prbyte(version.1); cout('.'); prbyte(version.0); crout
 //
 // Init 2K symbol table.
 //