test_k33g.golo

module Test

# in reply to https://github.com/TypeUnsafe/golo-x/blob/master/main.functional.golo#L8

import gololang.Errors

@result
function divide = |a,b| -> a / b

@result
function toInt = |sParam| -> intValue(sParam: trim())

# monadic chaining :)
function eval = |a, b| ->
    toInt(a): andThen(|x| ->
    toInt(b): andThen(|y| ->
    divide(x, y)))

function main = |args| {
  println(eval("84", "a"))
  # Result.error[java.lang.NumberFormatException: For input string: "a"]

  println(eval("84", "0"))
  # Result.error[java.lang.ArithmeticException: / by zero]

  println(eval("84", "2"))
  # Result.value[42]

  println(eval("  foo ", " 2   "): orElse(1))
  # 1
}