mirror of
https://github.com/roswell/roswell.git
synced 2026-09-10 07:16:17 -04:00
edit *.ros for package names.
This commit is contained in:
parent
3825a8029f
commit
4b915f49a4
|
|
@ -15,10 +15,9 @@ exec ros -Q -m roswell -L sbcl-bin -- $0 "$@"
|
|||
(unless (find-package :plump)
|
||||
(ql:quickload '(:plump) :silent t)))
|
||||
|
||||
(defpackage :ros.sub.asdf
|
||||
(:use :cl :ros.util :ros.locations))
|
||||
|
||||
(in-package :ros.sub.asdf)
|
||||
(defpackage :ros.script.asdf.3672011844
|
||||
(:use :cl :ros.util :ros.locations))
|
||||
(in-package :ros.script.asdf.3672011844)
|
||||
|
||||
(defun asdf-get-version ()
|
||||
(format *error-output* "Checking version to install....~%")
|
||||
|
|
|
|||
|
|
@ -6,9 +6,10 @@ exec ros -Q +R -- $0 "$@"
|
|||
|
||||
(unless (find-package :uiop)
|
||||
(ql:quickload :uiop :silent t))
|
||||
(defpackage :ros.sub.build
|
||||
|
||||
(defpackage :ros.script.build.3672011906
|
||||
(:use :cl))
|
||||
(in-package :ros.sub.build)
|
||||
(in-package :ros.script.build.3672011906)
|
||||
|
||||
(defun parse-argv (argv)
|
||||
(let* ((header "exec ros")
|
||||
|
|
|
|||
|
|
@ -12,10 +12,9 @@ exec ros +Q -m roswell -L sbcl-bin -- $0 "$@"
|
|||
(unless (find-package :uiop)
|
||||
(ql:quickload :uiop :silent t)))
|
||||
|
||||
(defpackage :ros.sub.delete
|
||||
(defpackage :ros.script.delete.3672011943
|
||||
(:use :cl :ros.util))
|
||||
|
||||
(in-package :ros.sub.delete)
|
||||
(in-package :ros.script.delete.3672011943)
|
||||
|
||||
(defun delete-dump (params)
|
||||
(declare (ignorable params))
|
||||
|
|
|
|||
|
|
@ -11,9 +11,9 @@ exec ros -- $0 "$@"
|
|||
#-quicklisp(require :uiop)
|
||||
#+quicklisp(ql:quickload :uiop :silent t)))
|
||||
|
||||
(defpackage :ros.dump
|
||||
(defpackage :ros.script.dump.3672012101
|
||||
(:use :cl :ros.util))
|
||||
(in-package :ros.dump)
|
||||
(in-package :ros.script.dump.3672012101)
|
||||
|
||||
(defun dump-dir ()
|
||||
(merge-pathnames (format nil "impls/~A/~A/~A/dump/"
|
||||
|
|
|
|||
|
|
@ -6,9 +6,9 @@ exec ros -L sbcl-bin -- $0 "$@"
|
|||
#-ros.util
|
||||
(ros:include "util")
|
||||
|
||||
(defpackage :ros.sub.emacs
|
||||
(defpackage :ros.script.emacs.3672012160
|
||||
(:use :cl))
|
||||
(in-package :ros.sub.emacs)
|
||||
(in-package :ros.script.emacs.3672012160)
|
||||
|
||||
(defun main (&rest argv)
|
||||
(let ((path (merge-pathnames "slime-helper.el" (ros:opt "quicklisp"))))
|
||||
|
|
|
|||
|
|
@ -7,10 +7,9 @@ exec ros -Q -m roswell -L sbcl-bin -- $0 "$@"
|
|||
#-ros.util
|
||||
(ros:include "util")
|
||||
|
||||
(defpackage :ros.sub.init
|
||||
(defpackage :ros.script.init.3672012201
|
||||
(:use :cl :ros))
|
||||
|
||||
(in-package :ros.sub.init)
|
||||
(in-package :ros.script.init.3672012201)
|
||||
|
||||
(defun main (subcmd cmd &optional name &rest r)
|
||||
(declare (ignore cmd))
|
||||
|
|
|
|||
|
|
@ -7,10 +7,9 @@ exec ros +Q -m roswell -L sbcl-bin -- $0 "$@"
|
|||
#-ros.util
|
||||
(ros:include "util")
|
||||
|
||||
(defpackage :ros.sub.list
|
||||
(defpackage :ros.script.list.3672012243
|
||||
(:use :cl :ros.util))
|
||||
|
||||
(in-package :ros.sub.list)
|
||||
(in-package :ros.script.list.3672012243)
|
||||
|
||||
(defun installed (&rest r)
|
||||
(cond
|
||||
|
|
|
|||
|
|
@ -7,9 +7,9 @@ exec ros -Q -L sbcl-bin -- $0 "$@"
|
|||
#-ros.util
|
||||
(ros:include "util")
|
||||
|
||||
(defpackage :ros.sub.setup
|
||||
(defpackage :ros.script.setup.3672012282
|
||||
(:use :cl :ros.util))
|
||||
(in-package :ros.sub.setup)
|
||||
(in-package :ros.script.setup.3672012282)
|
||||
|
||||
(defun main (&rest argv)
|
||||
(declare (ignorable argv))
|
||||
|
|
|
|||
|
|
@ -7,10 +7,10 @@ exec ros +R +Q -L sbcl-bin -m roswell -- $0 "$@"
|
|||
#-ros.util
|
||||
(ros:include "util")
|
||||
|
||||
(defpackage :ros.use
|
||||
(defpackage :ros.script.use.3672012320
|
||||
(:use :cl :ros.util))
|
||||
|
||||
(in-package :ros.use)
|
||||
(in-package :ros.script.use.3672012320)
|
||||
|
||||
(defun main (subcmd impl/version &rest argv)
|
||||
(declare (ignorable subcmd impl/version))
|
||||
|
|
|
|||
|
|
@ -3,9 +3,9 @@
|
|||
#|Wait forever
|
||||
exec ros -Q -- $0 "$@"
|
||||
|#
|
||||
(defpackage :ros.sub.wait
|
||||
(defpackage :ros.script.wait.3672012352
|
||||
(:use :cl))
|
||||
(in-package :ros.sub.wait)
|
||||
(in-package :ros.script.wait.3672012352)
|
||||
|
||||
(defun main (&rest argv)
|
||||
(declare (ignorable argv))
|
||||
|
|
|
|||
Loading…
Reference in a new issue