unison/unison-src/transcripts/old-fold-right.md
2024-06-25 11:11:07 -07:00

241 B

scratch/main> builtins.merge
oldRight: (b ->{e} a ->{e} b) -> [a] ->{e} [b]
oldRight f la = bug "out"

pecan: '{} [Text]
pecan = 'let
  la = [1, 2, 3]
  f: Text -> Nat -> Text
  f = bug "out"

  oldRight f la