Support Unicode characters in sys_read

Also provide a configurable register identifier for the destination, just like with `sys_puts`. Thanks Leonard for the suggestions: #8 (comment)
KCreate · Jul 22, 2017 · b5e7fa2 · b5e7fa2
1 parent 3c15b65
commit b5e7fa2
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/machine/vm.cr b/src/machine/vm.cr
@@ -1083,9 +1083,10 @@ module VM
         value = reg_read Int32, reg
         STDOUT.puts "#{value}"
       when Syscall::READ
+        reg = Register.new stack_pop UInt8
         char = STDIN.raw &.read_char
         if char.is_a?(Char)
-          reg_write Register::R0.byte, char.ord
+          reg_write reg, char.ord
         end
       else
         invalid_syscall id