jacinda-0.3.0.0: examples/span2.jac

:set fs:=/\|/;

fn printSpan(str) :=
  let
    val p := match str /\^+/
    val str := (sprintf '%i-%i')"p
  in str end;

printSpan:?{% /\|/}{`2}