Attempt to fiddle with open() mocking

leto · Jun 1, 2010 · d02c64e · d02c64e
1 parent 1b192c8
commit d02c64e
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 2 deletions.
diff --git a/plparrot.h b/plparrot.h
@@ -21,8 +21,15 @@
 ".end\n" \
 "\n" \
 ".namespace [\"PLParrot\"]\n" \
+".sub open\n" \
+"    .param pmc stuff :slurpy\n" \
+"    # die \"Attempt to open \"\n" \
+"    .return(42)\n" \
+".end\n" \
+"\n" \
 ".sub open :method\n" \
-"    .param pmc args :slurpy\n" \
+"    .param string file\n" \
+"    .param string mode\n" \
 "    # die \"Attempt to open \"\n" \
 "    .return(42)\n" \
 ".end\n" \

diff --git a/plparrot_secure.pir b/plparrot_secure.pir
@@ -15,8 +15,15 @@
 .end
 
 .namespace ["PLParrot"]
+.sub open
+    .param pmc stuff :slurpy
+    # die "Attempt to open "
+    .return(42)
+.end
+
 .sub open :method
-    .param pmc args :slurpy
+    .param string file
+    .param string mode
     # die "Attempt to open "
     .return(42)
 .end