jacinda-1.2.0.0: examples/silly.jac

fn count(x):=
  (+)|0 [:1"x;

let
  val ext := count {%/\{-#\s*LANGUAGE\s*(.*)#-\}/}{`0}
  val tot := count $0
in (ext.tot) end