minor optimization

Rev: lib/modules/Stdio.pmod:1.3

lib/modules/Stdio.pmod

@@ -96,6 +96,13 @@ class FILE {
       return o;
     }
 
+    int assign(object foo)
+    {
+      bpos=0;
+      b="";
+      return ::assign(foo);
+    }
+
     void set_nonblocking()
     {
       error("Cannot use nonblocking IO with buffered files.\n");