1: #line 1924 "./lpsrc/flx_regress.pak" 2: //Check typeclasses:polymorphic methods 3: #import <flx.flxh> 4: 5: typeclass X[u] { 6: virtual fun f[v]: u * v -> int; 7: } 8: 9: instance X[int] { 10: fun f[v]: int * v -> int = "(int)$1+$2"; 11: } 12: 13: fun g[with X[int]] (x:int, y:long) => f(x,y); 14: 15: print$ g$ 1,2L; endl; 16:
1: 3