https://github.com/ichimal/petit.package-utils.git
git clone 'https://github.com/ichimal/petit.package-utils.git'
(ql:quickload :petit.package-utils)
Petit tool box about packaging.
PETIT.PACKAGE-UTILS
PPU
and PETIT.PU
USE-CONFLICT-PACKAGE
:An alternative CL:USE-PACKAGE
function.
USE-CONFLICT-PACKAGE
enables USE-PACKAGE
'ing any packages which have conflicted external symbols.
e.g.
(defpackage :foo
(:shadow #:car)
(:use :cl)
(:export :car) )
(in-package :foo)
(defun car (obj) ...)
(in-package :cl-user)
(ppu:use-conflict-package :foo)
(symbol-package 'car) ; => #<PACKAGE FOO>
You can also specify to-package for USE-CONFLICT-PACKAGE
optionally.
e.g. (ppu:use-conflict-package
from-package to-package)
PACKAGE-SHORTEST-NAME
:Returns shortest name or nickname of given package designator.
e.g. (ppu:package-shortest-name :common-lisp-user) ; => "USER"
Note: for GNU CLISP, PPU:PACKAGE-SHORTEST-NAME
is just a synonym of EXT:PACKAGE-SHORTEST-NAME
.
Under MIT license.