1 2 3 4 5 6 7 8
-- Test polymorphic types in a breakpoint :l break012 :st g 5 `seq` () :t a :t b :t c :t d :p a b c d