summaryrefslogtreecommitdiff
path: root/riscv/platform_impl.ml
diff options
context:
space:
mode:
authorAlasdair Armstrong2018-10-29 16:27:47 +0000
committerGitHub2018-10-29 16:27:47 +0000
commit29f69b03602552d3ca1a29713527d21f5790e28a (patch)
treebd9a56d787ff8cf3bafacfeda771350bb854ab71 /riscv/platform_impl.ml
parent5471af45fd04169eb184371dcd8f791e507eab6f (diff)
parent8ae06c742324160e2677f233a8e509eaa46b54c3 (diff)
Merge pull request #21 from rems-project/riscv_c_platform
Merge C platform bits for RISC-V
Diffstat (limited to 'riscv/platform_impl.ml')
-rw-r--r--riscv/platform_impl.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/riscv/platform_impl.ml b/riscv/platform_impl.ml
index e593dce9..c5cc3fff 100644
--- a/riscv/platform_impl.ml
+++ b/riscv/platform_impl.ml
@@ -159,7 +159,7 @@ let make_dtb dts = (* Call the dtc compiler, assumed to be at /usr/bin/dtc *)
(* Terminal I/O *)
let term_write char =
- ignore (Unix.write_substring Unix.stdout (String.make 1 char) 0 1)
+ ignore (Unix.write_substring Unix.stderr (String.make 1 char) 0 1)
let rec term_read () =
let buf = Bytes.make 1 '\000' in