CompileCatchAll.out 1.3 KB

123456789101112131415161718192021222324252627282930313233343536373839
  1. EXECUTED_PROGRAM
  2. ret > ExitSuccess
  3. out > { compiling CompileCatchAll.f
  4. out > CompileCatchAll.f =
  5. out > λ a b →
  6. out > case b of
  7. out > Agda.Builtin.List.List.[] → 0
  8. out > Agda.Builtin.List.List._∷_ c _ →
  9. out > case a of
  10. out > Agda.Builtin.List.List.[] → c
  11. out > Agda.Builtin.List.List._∷_ d _ → d
  12. out > }
  13. out > { compiling CompileCatchAll.main
  14. out > CompileCatchAll.main =
  15. out > Common.IO.then
  16. out > () () _ _
  17. out > (Common.IO.printNat
  18. out > (CompileCatchAll.f
  19. out > Agda.Builtin.List.List.[] Agda.Builtin.List.List.[]))
  20. out > (Common.IO.then
  21. out > () () _ _
  22. out > (Common.IO.printNat
  23. out > (CompileCatchAll.f
  24. out > (Agda.Builtin.List.List._∷_ 1 Agda.Builtin.List.List.[])
  25. out > Agda.Builtin.List.List.[]))
  26. out > (Common.IO.then
  27. out > () () _ _
  28. out > (Common.IO.printNat
  29. out > (CompileCatchAll.f
  30. out > Agda.Builtin.List.List.[]
  31. out > (Agda.Builtin.List.List._∷_ 2 Agda.Builtin.List.List.[])))
  32. out > (Common.IO.printNat
  33. out > (CompileCatchAll.f
  34. out > (Agda.Builtin.List.List._∷_ 3 Agda.Builtin.List.List.[])
  35. out > (Agda.Builtin.List.List._∷_ 4 Agda.Builtin.List.List.[])))))
  36. out > }
  37. out > 0023