Minor changes.

diff --git a/kernel/urp.c b/kernel/urp.c
index 740d43e..2ec695a 100644 (file)
--- a/kernel/urp.c
+++ b/kernel/urp.c
@@ -2,7 +2,10 @@
  * Europagate, 1995
  *
  * $Log: urp.c,v $
- * Revision 1.8  1995/02/21 12:12:00  adam
+ * Revision 1.9  1995/02/21 17:46:21  adam
+ * Minor changes.
+ *
+ * Revision 1.8  1995/02/21  12:12:00  adam
  * Diagnostic record with error info. observed.
  *
  * Revision 1.7  1995/02/20  21:16:20  adam
@@ -417,7 +420,7 @@ static int exec_show (struct ccl_token *list)
                     const char *arg_ar[5];
 #endif
                     fprintf (reply_fd, "--- %d/%d ---\n",
-                             i+offset, offset+zp->num);
+                             i+offset, offset+zp->num-1);
                     if (pp->which == ZASS_REC_DIAG)
                     {
                         fprintf (reply_fd, "Record error %d: %s\n",