Update tests for entrypoints

2019-06-27 14:16:33 +02:00
parent 85408a12a2
commit 6a59e455ce
51 changed files with 465 additions and 446 deletions
@@ -91,10 +91,10 @@ contract Identity =
  // }
  // let id(x) = x
  // let main(xs) = map(double,xs)
-  function z(f,x) = x
-  private function s(n) = (f,x)=>f(n(f,x))
-  private function add(m,n) = (f,x)=>m(f,n(f,x))
-  function main(_) =
+  entrypoint z(f,x) = x
+  function s(n) = (f,x)=>f(n(f,x))
+  function add(m,n) = (f,x)=>m(f,n(f,x))
+  entrypoint main(_) =
    let three=s(s(s(z)))
    add(three,three)
       (((i)=>i+1),0)