#!/usr/bin/guile -s
!#
(use-modules (ice-9 debug))

(define cmdline (command-line))
(define progname (car cmdline))

(define datadir "../common/")

(load (string-append datadir "ensign.scm"))
(load (string-append datadir "lookout.scm"))

(load (string-append datadir "str.scm"))
(load (string-append datadir "algo.scm"))
(load (string-append datadir "pipe.scm"))
(load (string-append datadir "woobus.scm"))
(load (string-append datadir "command.scm"))
(load (string-append datadir "command-compat.scm"))
(load (string-append datadir "help.scm"))

(define (woo-query . cmdlist)
  (ensign cmdlist))

(application (lambda() (lookout-main "install3map.scm")))
