build/silt.ros @ 42c463ae193e

Fuck off asdf
author Steve Losh <steve@stevelosh.com>
date Wed, 10 Aug 2016 02:20:27 +0000
parents 23b82c42805f
children (none)
#!/bin/sh
#|-*- mode:lisp -*-|#
#|
exec ros -Q -- $0 "$@"
|#


(unless (find-package :silt)
  (ql:quickload '(:silt) :silent t))

(declaim (optimize (debug 0) (safety 1) (speed 3)))

(let ((*standard-output* (make-broadcast-stream)) ; shut
      (*error-output* (make-broadcast-stream))) ; up
  (asdf:load-system 'silt :force t))

(defun main (&rest argv)
  (declare (ignore argv))
  (silt::main))