Fixed MON instruction: getpid() was wrong

diff --git a/util/int/ChangeLog b/util/int/ChangeLog
index f89c105..119de47 100644 (file)
--- a/util/int/ChangeLog
+++ b/util/int/ChangeLog
@@ -1,3 +1,6 @@
+31-Jan-90  Ceriel Jacobs (ceriel) at ceriel
+       Fixed getpid() version of MON.
+
 26-Jan-90  Ceriel Jacobs (ceriel) at ceriel
        Fixed check in COM instruction.
 

diff --git a/util/int/moncalls.c b/util/int/moncalls.c
index 23e080d..fee1fed 100644 (file)
--- a/util/int/moncalls.c
+++ b/util/int/moncalls.c
@@ -557,7 +557,6 @@ moncall()
 
                pid = getpid();
                push_i2(pid);
-               push_int(0);
                LOG(("@m9 Getpid: succeeded, pid = %d", pid));
                break;