git @ Cat's Eye Technologies Bhuna / master eg / fibspawn2.bhu
master

Tree @master (Download .tar.gz)

fibspawn2.bhu @masterraw · history · blame

Fib = ^ X {
  if X > 2
    return Fib(X - 1) + Fib(X - 2)
  else
    return 1
}

MakeFibPrinter = ^ X {
  return ^ { Print "Fib(", X, ")=", Fib(X), EoL }
}

I = 1
while I <= 25 {
  Q = MakeFibPrinter(I)
  Pid = Spawn(Q)
  Print "Pid was ", Pid, EoL
  I = I + 1
}