23 lines
677 B
Common Lisp
Executable file
23 lines
677 B
Common Lisp
Executable file
#!/bin/sh
|
|
#|-*- mode:lisp -*-|#
|
|
#|
|
|
exec ros -Q -- $0 "$@"
|
|
|#
|
|
(progn ;;init forms
|
|
(ros:ensure-asdf)
|
|
(when (member :asdf3 *features*)
|
|
(asdf:initialize-source-registry
|
|
'(:source-registry (:tree :here)
|
|
:inherit-configuration)))
|
|
#-quicklisp (error "Quicklisp must be available to your Roswell install.")
|
|
#+quicklisp (ql:quickload '() :silent t)
|
|
#+quicklisp (ql:quickload '#:editor :silent t))
|
|
|
|
(defpackage :ros.script.run-editor-preview.3962771665
|
|
(:use :cl))
|
|
(in-package :ros.script.run-editor-preview.3962771665)
|
|
|
|
(defun main (&rest argv)
|
|
(declare (ignorable argv))
|
|
(editor:main (first argv) :refresh-asm-functions-p t))
|
|
;;; vim: set ft=lisp lisp:
|