Another update from ingydotnet^djgoku

2015-11-18 06:14:39 +00:00 · 2015-11-18 06:14:39 +00:00 · 948b86eafa
commit 948b86eafa
parent 91df62d461
7604 changed files with 108452 additions and 22726 deletions
--- a/Task/Balanced-ternary/ATS/balanced-ternary.ats
+++ b/Task/Balanced-ternary/ATS/balanced-ternary.ats
@ -61,12 +61,12 @@ loop{n:nat}
 //
  if isneqz(inp)
    then let
-      val c = inp.head
+      val c = inp.head()
      val d =
        (case- c of '+' => P | '0' => Z | '-' => N): btd
      // end of [val]
    in
-      loop (inp.tail, list_cons(d, ds))
+      loop (inp.tail(), list_cons(d, ds))
    end // end of [then]
    else ds // end of [else]
 //