Make the Ord Module independent of Unique order
[ghc.git] / testsuite / tests / cps / cps010.cmm
1 // Test general stack check
2 // Note, the GC block shouldn't trigger the stack limit
3
4 foo6_gc_slow("ptr" bits32 f, bits32 x) goto GC {
5   return (7);
6 GC:
7   foreign "C--" stg_gc_gen() "safe";
8   jump foo6_gc_slow(f, x);
9 }