Author: leo
Date: Thu Mar 9 12:14:35 2006
New Revision: 11839
Modified:
trunk/src/ops/io.ops
trunk/src/ops/ops.num
Log:
work around recv opcode mess and warning
Modified: trunk/src/ops/io.ops
==============================================================================
--- trunk/src/ops/io.ops (original)
+++ trunk/src/ops/io.ops Thu Mar 9 12:14:35 2006
@@ -520,7 +520,7 @@
=item B<connect>(out INT, in PMC, in STR)
-=item B<recv>(out INT, in PMC, in STR)
+=item B<recv>(out INT, in PMC, out STR)
=item B<send>(out INT, in PMC, in STR)
@@ -552,7 +552,11 @@
goto NEXT();
}
-op recv(out INT, in PMC, in STR) :base_network {
+op NO_SUCH_recv(out INT, in PMC, inconst STR) :base_network {
+ goto NEXT();
+}
+
+op recv(out INT, in PMC, out STR) :base_network {
STRING *dest = $3;
$1 = (INTVAL)PIO_recv(interpreter, $2, &dest);
$3 = dest;
Modified: trunk/src/ops/ops.num
==============================================================================
--- trunk/src/ops/ops.num (original)
+++ trunk/src/ops/ops.num Thu Mar 9 12:14:35 2006
@@ -508,7 +508,7 @@
connect_i_p_s 478
connect_i_p_sc 479
recv_i_p_s 480
-recv_i_p_sc 481
+NO_SUCH_recv_i_p_sc 481
send_i_p_s 482
send_i_p_sc 483
poll_i_p_i_i_i 484
