philtomson · May 7, 2011 05:34
diff --git a/gistfile1.txt b/gistfile1.txt
 let string_rev str =
   let rec aux  idx = match idx with
     0 -> Char.escaped (str.[0])
   | _ -> (Char.escaped str.[idx]) ^ (aux (idx-1)) in
  aux ((String.length str)-1) ;;
	let string_rev str =
	let rec aux idx = match idx with
	0 -> Char.escaped (str.[0])
	\| _ -> (Char.escaped str.[idx]) ^ (aux (idx-1)) in
	aux ((String.length str)-1) ;;