Index: io.ops
===================================================================
RCS file: /cvs/public/parrot/ops/io.ops,v
retrieving revision 1.40
diff -u -r1.40 io.ops
--- io.ops	23 Oct 2003 17:41:55 -0000	1.40
+++ io.ops	27 Oct 2003 20:18:16 -0000
@@ -142,9 +142,7 @@
 Open URL (file, address, database, in core image) named $2 with
 read/write mode and create an IO object in $1.
 
-=cut
-
-inline op open(out PMC, in STR, in STR) {
+=cutnline op open(out PMC, in STR, in STR) {
   /* These char * need to go away soon */
   const char * path, * mode;
 
@@ -494,7 +492,7 @@
 }
 
 op sockaddr(out STR, in INT, in STR) {
-    $1 = PIO_sockaddr_in(interpreter, $2, $3);
+    $1 = PIO_sockaddr_in(interpreter, (unsigned short) $2, $3);
     goto NEXT();
 }
 
Index: string.ops
===================================================================
RCS file: /cvs/public/parrot/ops/string.ops,v
retrieving revision 1.9
diff -u -r1.9 string.ops
--- string.ops	23 Oct 2003 17:41:55 -0000	1.9
+++ string.ops	27 Oct 2003 20:18:17 -0000
@@ -56,7 +56,7 @@
 inline op chr (out STR, in INT) {
   STRING *s;
   s = string_make(interpreter, &$1, (UINTVAL)1, NULL, 0, NULL);
-  *(char *)s->strstart = $2;
+  *(char *)s->strstart = (unsigned char) $2;
   s->strlen = 1;
   $1 = s;
   goto NEXT();