--- freem/src/xecline.c	2025/05/14 12:22:04	1.24
+++ freem/src/xecline.c	2025/05/19 02:03:31	1.26
@@ -1,5 +1,5 @@
 /*
- *   $Id: xecline.c,v 1.24 2025/05/14 12:22:04 snw Exp $
+ *   $Id: xecline.c,v 1.26 2025/05/19 02:03:31 snw Exp $
  *    freem interpreter proper
  *
  *  
@@ -24,6 +24,12 @@
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *
  *   $Log: xecline.c,v $
+ *   Revision 1.26  2025/05/19 02:03:31  snw
+ *   Reverse-engineer and document argumented ZPRINT (thanks to D. Wicksell)
+ *
+ *   Revision 1.25  2025/05/18 18:15:38  snw
+ *   Add ZEDIT command for editing routines
+ *
  *   Revision 1.24  2025/05/14 12:22:04  snw
  *   Further work on shared memory
  *
@@ -5292,6 +5298,11 @@ halt:
             break;
 
         /* Z-COMMANDS */
+        case ZEDIT:
+            merr_raise (cmd_zedit (&ra));
+            MRESCHECK(ra);
+            break;
+            
         case ZGO:
 
             /* ZGO with arguments: same as GOTO but with BREAK on */
@@ -5431,7 +5442,7 @@ zgo:
                     merr_raise (NOPGM);
 
                     break;
-                }           /*error */
+                }           /* error */
 
                 stcpy (varnam, rou_name);
             }
@@ -5567,11 +5578,11 @@ zgo:
                 if (*codptr == EOL || *codptr == SP) {
                     merr_raise (ARGLIST);
                     break;
-                }           /*error */
+                }           /* error */
                 
                 dosave[0] = EOL;
 
-                /* parse stringlit */
+                /* parse strlit */
                 expr (STRING);
                 
                 if (merr () > OK) break;