diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index d9ff4e32..6e434782 100644
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -3987,7 +3987,7 @@ impl Machine {
         )?;
 
         if !stream.is_output_stream() {
-            let stub = functor_stub(atom!("set_input"), 1);
+            let stub = functor_stub(atom!("set_output"), 1);
 
             let user_alias = atom_as_cell!(atom!("user"));
             let err = self.machine_st.permission_error(