;; -*- Mode: Irken -*-

(include "lib/core.scm")

;; need to figure out how to make macros not infinitely recurse.

;; (defmacro -
;;   (- x) -> (- 0 x)
;;   (- x y z ...) -> (- (- x y) z ...)
;;   )

;; (defmacro +
;;   (+ x y ...) -> (+ x (+ y ...))
;;   )

(printn (- 3 4 5))
(printn (- 5))
(printn (+ 1 2 3 4 5))