# let (r,w) = Unix.pipe ();; (*括弧をつけないとsyntax errorらしい win95*)
val r : Unix.file_descr = <abstr>
val w : Unix.file_descr = <abstr>
# Unix.write w "tak" 0 3;;
- : int = 3
# let buf = String.create 10;;
val buf : string = "h\021q\000｡\000\000\000\000\000"
# Unix.read r buf 0 3;;
- : int = 3
# buf;;
- : string = "tak\000｡\000\000\000\000\000"