Store iosys_mode for our own use to avoid a function call

Author: curiousdannii

glulxtoc/src/output/functions_common.rs

@@ -85,7 +85,7 @@ impl GlulxOutput {
             OP_GETSTRINGTBL => String::from("stream_get_table()"),
             OP_SETSTRINGTBL => runtime("stream_set_table", &args),
             // OP_GETIOSYS
-            OP_SETIOSYS => runtime("stream_set_iosys", &args),
+            OP_SETIOSYS => format!("iosys_mode = {}; stream_set_iosys(iosys_mode, {})", op_a, op_b),
             OP_GLK => format!("(temp0 = {}, temp1 = {}, perform_glk(temp0, temp1, pop_arguments(temp1, 0)))", op_a, op_b),
             OP_RANDOM => runtime("OP_RANDOM", &args),
             OP_SETRANDOM => runtime("glulx_setrandom", &args),

glulxtoc/src/output/templates/glulxtoc.h

@@ -35,6 +35,7 @@ extern char _binary_image_data_start[];
 #define GLULX_IMAGE _binary_image_data_start
 
 // runtime.c
+extern int iosys_mode;
 extern glui32 OP_DIV(glui32 arg1, glui32 arg2);
 extern glui32 OP_MOD(glui32 arg1, glui32 arg2);
 extern glui32 OP_SHIFTL(glui32 arg1, glui32 arg2);

glulxtoc/src/output/templates/runtime.c

@@ -15,6 +15,8 @@ MIT licenced
 #include "glulxtoc.h"
 #include <math.h>
 
+int iosys_mode;
+
 // From accel.c
 void init_accel(void) {}
 acceleration_func accel_find_func(glui32 index) { return NULL; }
@@ -254,8 +256,6 @@ void OP_STKROLL(glui32 arg0, glui32 arg1) {
 
 void OP_STREAMX_SAFE(int mode, glui32 val) {
     // Shortcut for safe streaming
-    glui32 iosys_mode, iosys_rock;
-    stream_get_iosys(&iosys_mode, &iosys_rock);
     if (iosys_mode != 1 /* iosys_Filter */) {
         switch (mode) {
             case STREAM_CHAR: (*stream_char_handler)(val & 0xFF); return;