Comment detail

文字列の反転 (Nested Flatten)
SML#のLMLMLライブラリを使って。
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
fun reverse_string str =
let
  open ShiftJISCodec
  val s = String.fromString str
in
  String.toString (String.implode (rev (String.explode str)))
end;

println (reverse_string "Hello");
println (reverse_string "こんにちは");
println (reverse_string "濁点(だくてん)")
間違えた。正しくはこう。
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
--- 2961.orig   2007-09-10 22:23:00.000000000 +0900
+++ 2961.sml    2007-09-10 22:23:22.000000000 +0900
@@ -3,7 +3,7 @@
   open ShiftJISCodec
   val s = String.fromString str
 in
-  String.toString (String.implode (rev (String.explode str)))
+  String.toString (String.implode (rev (String.explode s)))
 end;

 println (reverse_string "Hello");

Index

Feed

Other

Link

Pathtraq

loading...