;; Test of parameter passing mechanisms

(def (test a b c)
  (begin (println "enter")
         (bind result (+ c (* b b))
               (begin (println "exit")
                      result))))

(def (testpp) 
  (test (println (+ 1 2)) 
	(println (+ 3 4)) 
	(println (+ 5 6))))