1(in-package :abcl/build)
2
3(defun abcl/build ()
4  (abcl-build:ant/call (asdf:system-relative-pathname :abcl "build.xml")
5                      "abcl"))
6
7(defun abcl/dist ()
8  (abcl-build:ant/call (asdf:system-relative-pathname :abcl "build.xml")
9                      "abcl.release"))
10
11(defun abcl/test ()
12  (abcl-build:ant/call (asdf:system-relative-pathname :abcl "build.xml")
13                      "abcl.test"))
14
15