kc3-lang/kc3/test/ikc3/fn.out.expected

Branch - branch -masterpdfpdf-rebasedtlstls-rebasedcallablecallable-rebaseconfigurefastfast2fnfractionsfractions-rebaseframeherunstoofastforushttpdjeremy_rebasedlinuxmarshallmarshall_before_mergemarshall_rebasepointerratio-rebasev0.1- tag -v0.1.9v0.1.8v0.1.7v0.1.6v0.1.5v0.1.4v0.1.3v0.1.2v0.1.15v0.1.14v0.1.13v0.1.12v0.1.11v0.1.10v0.1.1v0.1.0v0HTTPd-v0.2.0HTTPd-v0.1.1HTTPd-v0.1.0

• Show log

  Commit

• Hash : 62fc1263
  Author : Thomas de Grivel
  Date : 2025-07-14T18:32:31
  

  fix fn test
  

Download

• test/ikc3/fn.out.expected

• fn (x) { x }
  fn (x, _y) { x }
  fn ([x | _y]) { x }
  fn {
    ([]) { :error }
    ([x | _y]) { x }
    (_) { :error }
  }
  fn (x) do
    "Hello, world !"
    x * 2
  end
  fn (x) { x }
  1
  fn (x, _y) { x }
  1
  fn ([x | _y]) { x }
  1
  fn {
    ([]) { :error }
    ([x | _y]) { x }
    (_) { :error2 }
  }
  1
  fn (x) do
    "Hello, world !"
    x * 2
  end
  4
  do
    f = fn (x) do
      puts("Hello, world !")
      x * 2
    end
    f(2)
  end
  Hello, world !
  4
  f = fn (x) { fn (y) { x * y } }
  fn (x) { fn (y) { x * y } }
  g = f(2)
  fn (y) { x * y } [x: 2]
  g(3)
  6
  h = fn (x) { unwind_protect(do
      puts("a")
      return x * 2
      -1
    end, puts("b")) }
  fn (x) { unwind_protect(do
      puts("a")
      return x * 2
      -1
    end, puts("b")) }
  h(21)
  a
  b
  42
  

Download