Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
clpm
clpm
Commits
b7dbcd8a
Commit
b7dbcd8a
authored
Feb 21, 2021
by
Eric Timmons
Browse files
Add some missed files
parent
1d13cb10
Pipeline
#2964
failed with stages
in 18 minutes and 10 seconds
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
scripts/test.lisp
0 → 100644
View file @
b7dbcd8a
;;;; Script to test a CLPM executable
;;;;
;;;; This software is part of CLPM. See README.org for more information. See
;;;; LICENSE for license information.
(
in-package
#:cl-user
)
(
load
(
merge-pathnames
"common.lisp"
*load-truename*
))
(
in-package
#:clpm-scripts
)
(
defparameter
*option-clpm*
(
adopt:make-option
:clpm
:help
"Specify the clpm executable to test"
:long
"clpm"
:initial-value
"clpm"
:parameter
"CLPM-EXEC"
:reduce
#'
adopt:last
))
(
defparameter
*ui*
(
adopt:make-interface
:name
"scripts/build.lisp"
:summary
"Build script for CLPM"
:help
"Build script for CLPM"
:usage
"[options]"
:contents
(
list
*option-help*
*option-clpm*
)))
(
defvar
*args*
)
(
defvar
*opts*
)
(
multiple-value-setq
(
*args*
*opts*
)
(
adopt:parse-options
*ui*
))
(
when
(
gethash
:help
*opts*
)
(
adopt:print-help-and-exit
*ui*
))
(
asdf:load-system
:clpm-test
)
(
let
((
clpm
(
gethash
:clpm
*opts*
)))
(
when
(
pathname-directory
clpm
)
(
setf
clpm
(
uiop:ensure-absolute-pathname
(
merge-pathnames
clpm
(
uiop:getcwd
)))))
(
unless
(
clpm-test::run-tests-with-server
:clpm
clpm
)
(
uiop:quit
1
)))
scripts/version.lisp
0 → 100644
View file @
b7dbcd8a
;;;; Script to print the CLPM version number
;;;;
;;;; This software is part of CLPM. See README.org for more information. See
;;;; LICENSE for license information.
(
in-package
#:cl-user
)
(
load
(
merge-pathnames
"common.lisp"
*load-truename*
))
(
in-package
#:clpm-scripts
)
(
let
((
*standard-output*
(
make-broadcast-stream
))
(
*error-output*
(
make-broadcast-stream
)))
(
asdf:load-system
:clpm-asdf
))
(
write-string
(
clpm-asdf::clpm-version
))
(
terpri
)
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment