Changeset 121ac13 for src/tests/polymorphism.c

Timestamp:

Nov 6, 2017, 10:28:17 AM (6 years ago)

Author:

Thierry Delisle <tdelisle@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, with_gc

Children:

bbeb908

Parents:

59a0bde (diff), 9f4524b (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

File:

• src/tests/polymorphism.c (modified) (1 diff)

src/tests/polymorphism.c

@@ -16 +16 @@
 forall(otype T)
 T f(T x, T y) {
-  x = y;
-  return x;
+        x = y;
+        return x;
+}
+
+forall(otype T) T ident(T x) {
+        return x;
 }
 
 int main() {
-  // ensure that x is not changed by the invocation of a polymorphic function
-  int x = 123;
-  int y = 456;
-  int z = f(x, y);
-  printf("%d %d %d\n", x, y, z);
+        // ensure that x is not changed by the invocation of a polymorphic function
+        int x = 123;
+        int y = 456;
+        int z = f(x, y);
+        printf("%d %d %d\n", x, y, z);
+
+        // explicitly specialize function
+        int (*f)(int) = ident;
+        ((int(*)(int))ident);
+        printf("%d %d\n", f(5), ((int(*)(int))ident)(5));
 }