source: src/examples/esskaykay.c@ 2bae7307

ADT aaron-thesis arm-eh ast-experimental cleanup-dtors ctor deferred_resn demangler enum forall-pointer-decay gc_noraii jacob/cs343-translation jenkins-sandbox memory new-ast new-ast-unique-expr new-env no_list persistent-indexer pthread-emulation qualifiedEnum resolv-new string with_gc
Last change on this file since 2bae7307 was 843054c2, checked in by Peter A. Buhr <pabuhr@…>, 10 years ago

licencing: seventh groups of files

  • Property mode set to 100644
File size: 437 bytes
Line 
1// "./cfa-cpp -cn esskaykay.c"
2
3// forall (type A, type B, type C) C ess (C (*f) (A,B), B (*g) (A), A x) { return f(x,g(x)); }
4forall (type A, type B, type C) C ess (C (*(*f)(A))(B), B (*g)(A), A x) { return f(x)(g(x)); }
5
6// forall (type A, type B) A kay (A a, B b) { return a; }
7forall (type A, type B) A (*kay(A a))(B b);
8
9// Now is the following function well-typed, or not?
10
11forall (type A) A esskaykay (A x) { ess (kay, kay, x); }
Note: See TracBrowser for help on using the repository browser.