Source

shakespeare-parrot / shakespeare.pir

Diff from to

File shakespeare.pir

 
 .namespace [ 'shakespeare';'Compiler' ]
 
-.loadlib 'io_ops'
 .loadlib 'obscure_ops'
+.include 'stdio.pasm'
 
 .sub 'interactive' :method
     # ignored
     .local pmc rgx, stdin, match
     .local string output, prompt, code
     prompt = '>'
-    stdin = getstdin
+    $P0 = getinterp
+    stdin = $P0.'stdhandle'(.PIO_STDIN_FILENO)
     say "Thou hast entered the interactive sentence verifier"
     say "Enter a Sentence to see How It Parses"
     rgx= get_hll_global ['shakespeare';'Grammar'], 'sentence'