This is the metatilities-base Reference Manual, version 0.6.6, generated automatically by Declt version 4.0 beta 2 "William Riker" on Sun Dec 15 07:02:32 2024 GMT+0.
metatilities-base/metatilities-base.asdmetatilities-base/setup/package.lispmetatilities-base/dev/api.lispmetatilities-base/dev/l0-utils.lispmetatilities-base/dev/l0-strings.lispmetatilities-base/dev/l0-macros.lispmetatilities-base/dev/l0-arrays.lispmetatilities-base/dev/l0-clos.lispmetatilities-base/dev/l0-files.lispmetatilities-base/dev/l0-time.lispmetatilities-base/dev/set-equal.lispmetatilities-base/dev/generic-lisp.lispmetatilities-base/dev/generic-interface.lispmetatilities-base/dev/defclass-star.lispmetatilities-base/dev/copy-file.lispThe main system appears first, followed by any subsystem dependency.
metatilities-baseThese are metabang.com’s Common Lisp basic utilities.
Gary Warren King <gwking@metabang.com>
Gary Warren King <gwking@metabang.com>
MIT Style license
These are metabang.com’s Common Lisp basic utilities and what not.
0.6.6
Modules are listed depth-first from the system components tree.
metatilities-base/setupmetatilities-base (system).
package.lisp (file).
metatilities-base/devsetup (module).
metatilities-base (system).
api.lisp (file).
l0-utils.lisp (file).
l0-strings.lisp (file).
l0-macros.lisp (file).
l0-arrays.lisp (file).
l0-clos.lisp (file).
l0-files.lisp (file).
l0-time.lisp (file).
set-equal.lisp (file).
generic-lisp.lisp (file).
generic-interface.lisp (file).
defclass-star.lisp (file).
copy-file.lisp (file).
Files are sorted by type and then listed depth-first from the systems components trees.
metatilities-base/metatilities-base.asdmetatilities-base/setup/package.lispmetatilities-base/dev/api.lispmetatilities-base/dev/l0-utils.lispmetatilities-base/dev/l0-strings.lispmetatilities-base/dev/l0-macros.lispmetatilities-base/dev/l0-arrays.lispmetatilities-base/dev/l0-clos.lispmetatilities-base/dev/l0-files.lispmetatilities-base/dev/l0-time.lispmetatilities-base/dev/set-equal.lispmetatilities-base/dev/generic-lisp.lispmetatilities-base/dev/generic-interface.lispmetatilities-base/dev/defclass-star.lispmetatilities-base/dev/copy-file.lispmetatilities-base/metatilities-base.asdmetatilities-base (system).
metatilities-base/dev/api.lispdev (module).
close-progress-bar (generic function).
inspect-thing* (generic function).
make-progress-bar (generic function).
make-ui-point* (generic function).
progress-bar-value (generic function).
(setf progress-bar-value) (generic function).
choose-directory-question* (generic function).
choose-file-question* (generic function).
choose-item-from-pup* (generic function).
choose-item-question* (generic function).
choose-new-file-question* (generic function).
gui-error* (generic function).
gui-warn* (generic function).
help-spec (generic function).
interface-beep* (generic function).
make-color** (generic function).
make-gray* (generic function).
make-scaled-color* (generic function).
name (generic function).
process-parameters* (generic function).
prompt-for* (generic function).
put-item-on-clipboard* (generic function).
report-condition (generic function).
select-instrument* (generic function).
sound-note* (generic function).
stop-notes* (generic function).
y-or-n-question* (generic function).
metatilities-base/dev/l0-utils.lispapi.lisp (file).
dev (module).
apply-if-exists (function).
current-load-file (function).
dotted-pair-p (function).
ensure-list (function).
export-exported-symbols (function).
fixnump (function).
form-keyword (function).
form-symbol (function).
form-symbol-in-package (function).
form-uninterned-symbol (function).
funcall-if-exists (function).
iterate-over-indexes (function).
length-1-list-p (function).
length-at-least-p (generic function).
length-at-most-p (generic function).
nearly-equal-p (function).
nearly-zero-p (function).
neq (compiler macro).
neq (function).
newsym (function).
with-unique-names (macro).
*newsym-counter* (special variable).
call-if-exists (function).
ensure-function (function).
with-standard-printing (macro).
metatilities-base/dev/l0-strings.lispapi.lisp (file).
dev (module).
+whitespace-characters+ (special variable).
string-ends-with (function).
string-starts-with (function).
string-trim-if (function).
strip-whitespace (function).
whitespacep (function).
metatilities-base/dev/l0-macros.lispapi.lisp (file).
l0-utils.lisp (file).
dev (module).
*file-if-exists* (special variable).
defclass-property (macro).
deprecated (macro).
eval-always (macro).
handler-bind* (macro).
muffle-redefinition-warnings (macro).
nyi (macro).
once-only (macro).
with-atomic-execution (macro).
with-gensyms (macro).
with-input (macro).
with-new-file (macro).
with-output (macro).
with-stream-from-specifier (macro).
with-variables (macro).
*file-print-right-margin* (special variable).
metatilities-base/dev/l0-arrays.lispapi.lisp (file).
dev (module).
array-row (function).
copy-array (function).
linearize-array (function).
maparray (function).
maparray! (function).
metatilities-base/dev/l0-clos.lispapi.lisp (file).
dev (module).
*samep-test* (special variable).
nearly-samep (generic function).
samep (generic function).
*samep-tolerance* (special variable).
finalize-class-if-necessary (function).
get-class (generic function).
metatilities-base/dev/l0-files.lispapi.lisp (file).
l0-macros.lisp (file).
dev (module).
collect-forms (function).
collect-lines (function).
collect-matching-files (function).
directory-pathname-p (function).
ensure-directory-pathname (function).
file-newer-than-file-p (function).
invalid-stream-specifier-error (function).
invalid-stream-specifier-error (condition).
map-forms (function).
map-lines (function).
map-matching-files (function).
pathname-samep (function).
pathname-without-name+type (function).
physical-pathname-directory-separator (function).
relative-pathname (function).
close-stream-specifier (generic function).
compile-expression (function).
make-stream-from-specifier (generic function).
pathname-name+type (function).
stream-specifier (reader method).
stream-specifier-args (reader method).
stream-specifier-direction (reader method).
metatilities-base/dev/l0-time.lispl0-macros.lisp (file).
dev (module).
+hours-per-day+ (constant).
+minutes-per-hour+ (constant).
+seconds-per-day+ (constant).
+seconds-per-hour+ (constant).
+seconds-per-minute+ (constant).
+usual-days-per-year+ (constant).
day->string (function).
day-of-year (function).
days-in-month (function).
format-date (function).
leap-year-p (function).
month->string (function).
time-date (function).
time-day-of-week (function).
time-daylight-savings-time-p (function).
time-hour (function).
time-minute (function).
time-month (function).
time-second (function).
time-year (function).
+days-per-month+ (special variable).
+dow-output-list (special variable).
+longer-format-index+ (constant).
+month-output-list+ (special variable).
+shorter-format-index+ (constant).
generate-time-part-function (macro).
metatilities-base/dev/set-equal.lispapi.lisp (file).
dev (module).
set-equal (function).
metatilities-base/dev/generic-lisp.lispapi.lisp (file).
dev (module).
collect-garbage (function).
collect-garbage* (generic function).
default-interface (function).
(setf default-interface) (function).
gc-time (function).
is-default-interface-available-p (function).
is-interface-available-p (generic function).
make-load-form* (macro).
quit-lisp (function).
quit-lisp* (generic function).
total-bytes-allocated (function).
total-bytes-allocated* (generic function).
*default-interface* (special variable).
gc-time* (generic function).
metatilities-base/dev/generic-interface.lispapi.lisp (file).
generic-lisp.lisp (file).
l0-macros.lisp (file).
dev (module).
*development-mode* (special variable).
*use-native-debugger* (special variable).
choose-directory-question (function).
choose-file-question (function).
choose-item-from-pup (function).
choose-item-from-pup-no-singletons (function).
choose-item-question (function).
choose-new-file-question (function).
close-progress-bar (method).
gui-error (function).
gui-warn (function).
handle-errors (macro).
inspect-thing (function).
inspect-thing* (method).
inspect-things (function).
interface-beep (function).
make-color* (function).
make-gray (function).
make-progress-bar (method).
make-scaled-color (function).
make-ui-point* (method).
process-parameters (function).
progress-bar-value (method).
(setf progress-bar-value) (method).
prompt-for (function).
put-item-on-clipboard (function).
query-user-for-integer (function).
query-user-for-string (function).
select-instrument (function).
sound-note (function).
stop-notes (function).
with-process-message (macro).
with-progress-bar (macro).
y-or-n-question (function).
*dummy-progress-variable* (special variable).
*progress-bar-count* (special variable).
choose-directory-question* (method).
choose-file-question* (method).
choose-item-from-pup* (method).
choose-item-question* (method).
choose-new-file-question* (method).
gui-error* (method).
gui-warn* (method).
interface-beep* (method).
make-color** (method).
make-gray* (method).
make-scaled-color* (method).
make-ui-point (function).
process-parameters* (method).
prompt-for* (method).
prompt-for* (method).
prompt-for* (method).
put-item-on-clipboard* (method).
report-condition (method).
select-instrument* (method).
sound-note* (method).
stop-notes* (method).
y-or-n-question* (method).
metatilities-base/dev/defclass-star.lispapi.lisp (file).
l0-macros.lisp (file).
dev (module).
class-copyable-p (function).
defclass* (macro).
defclass-brief (macro).
defcondition (macro).
parse-brief-slot (function).
*automatic-slot-accessors?* (special variable).
*automatic-slot-initargs?* (special variable).
*clos-slot-options* (special variable).
*defclass-copy-condition-function* (special variable).
*defclass-generate-make-load-form* (special variable).
*defcondition-options* (special variable).
*prune-unknown-slot-options* (special variable).
defclass*-superclasses (generic function).
(setf defclass*-superclasses) (generic function).
metatilities-base/dev/copy-file.lispdev (module).
copy-file (function).
source-pathname (reader method).
source/target-file-error (condition).
source/target-source-does-not-exist-error (condition).
source/target-target-already-exists-error (condition).
target-pathname (reader method).
*stream-buffer-size* (special variable).
copy-stream (function).
move-file (function).
Packages are listed by definition order.
metabang.utilitiesmetatilities
common-lisp.
*development-mode* (special variable).
*file-if-exists* (special variable).
*samep-test* (special variable).
*use-native-debugger* (special variable).
+hours-per-day+ (constant).
+minutes-per-hour+ (constant).
+seconds-per-day+ (constant).
+seconds-per-hour+ (constant).
+seconds-per-minute+ (constant).
+usual-days-per-year+ (constant).
+whitespace-characters+ (special variable).
apply-if-exists (function).
array-row (function).
choose-directory-question (function).
choose-file-question (function).
choose-item-from-pup (function).
choose-item-from-pup-no-singletons (function).
choose-item-question (function).
choose-new-file-question (function).
class-copyable-p (function).
close-progress-bar (generic function).
collect-forms (function).
collect-garbage (function).
collect-garbage* (generic function).
collect-lines (function).
collect-matching-files (function).
copy-array (function).
copy-file (function).
current-load-file (function).
day->string (function).
day-of-year (function).
days-in-month (function).
default-interface (function).
(setf default-interface) (function).
defclass* (macro).
defclass-brief (macro).
defclass-property (macro).
defcondition (macro).
deprecated (macro).
directory-pathname-p (function).
dotted-pair-p (function).
ensure-directory-pathname (function).
ensure-list (function).
eval-always (macro).
export-exported-symbols (function).
file-newer-than-file-p (function).
fixnump (function).
form-keyword (function).
form-symbol (function).
form-symbol-in-package (function).
form-uninterned-symbol (function).
format-date (function).
funcall-if-exists (function).
gc-time (function).
gui-error (function).
gui-warn (function).
handle-errors (macro).
handler-bind* (macro).
inspect-thing (function).
inspect-thing* (generic function).
inspect-things (function).
interface-beep (function).
invalid-stream-specifier-error (function).
invalid-stream-specifier-error (condition).
is-default-interface-available-p (function).
is-interface-available-p (generic function).
iterate-over-indexes (function).
leap-year-p (function).
length-1-list-p (function).
length-at-least-p (generic function).
length-at-most-p (generic function).
linearize-array (function).
make-color* (function).
make-gray (function).
make-load-form* (macro).
make-progress-bar (generic function).
make-scaled-color (function).
make-ui-point* (generic function).
map-forms (function).
map-lines (function).
map-matching-files (function).
maparray (function).
maparray! (function).
month->string (function).
muffle-redefinition-warnings (macro).
nearly-equal-p (function).
nearly-samep (generic function).
nearly-zero-p (function).
neq (compiler macro).
neq (function).
newsym (function).
nyi (macro).
once-only (macro).
parse-brief-slot (function).
pathname-samep (function).
pathname-without-name+type (function).
physical-pathname-directory-separator (function).
process-parameters (function).
progress-bar-value (generic function).
(setf progress-bar-value) (generic function).
prompt-for (function).
put-item-on-clipboard (function).
query-user-for-integer (function).
query-user-for-string (function).
quit-lisp (function).
quit-lisp* (generic function).
relative-pathname (function).
samep (generic function).
select-instrument (function).
set-equal (function).
sound-note (function).
source-pathname (generic reader).
source/target-file-error (condition).
source/target-source-does-not-exist-error (condition).
source/target-target-already-exists-error (condition).
stop-notes (function).
string-ends-with (function).
string-starts-with (function).
string-trim-if (function).
strip-whitespace (function).
target-pathname (generic reader).
time-date (function).
time-day-of-week (function).
time-daylight-savings-time-p (function).
time-hour (function).
time-minute (function).
time-month (function).
time-second (function).
time-year (function).
total-bytes-allocated (function).
total-bytes-allocated* (generic function).
whitespacep (function).
with-atomic-execution (macro).
with-gensyms (macro).
with-input (macro).
with-new-file (macro).
with-output (macro).
with-process-message (macro).
with-progress-bar (macro).
with-stream-from-specifier (macro).
with-unique-names (macro).
with-variables (macro).
y-or-n-question (function).
*automatic-slot-accessors?* (special variable).
*automatic-slot-initargs?* (special variable).
*clos-slot-options* (special variable).
*default-interface* (special variable).
*defclass-copy-condition-function* (special variable).
*defclass-generate-make-load-form* (special variable).
*defcondition-options* (special variable).
*dummy-progress-variable* (special variable).
*file-print-right-margin* (special variable).
*newsym-counter* (special variable).
*progress-bar-count* (special variable).
*prune-unknown-slot-options* (special variable).
*samep-tolerance* (special variable).
*stream-buffer-size* (special variable).
+days-per-month+ (special variable).
+dow-output-list (special variable).
+longer-format-index+ (constant).
+month-output-list+ (special variable).
+shorter-format-index+ (constant).
call-if-exists (function).
choose-directory-question* (generic function).
choose-file-question* (generic function).
choose-item-from-pup* (generic function).
choose-item-question* (generic function).
choose-new-file-question* (generic function).
close-stream-specifier (generic function).
compile-expression (function).
copy-stream (function).
defclass*-superclasses (generic function).
(setf defclass*-superclasses) (generic function).
ensure-function (function).
finalize-class-if-necessary (function).
gc-time* (generic function).
generate-time-part-function (macro).
get-class (generic function).
gui-error* (generic function).
gui-warn* (generic function).
help-spec (generic function).
interface-beep* (generic function).
make-color** (generic function).
make-gray* (generic function).
make-scaled-color* (generic function).
make-stream-from-specifier (generic function).
make-ui-point (function).
move-file (function).
name (generic function).
pathname-name+type (function).
process-parameters* (generic function).
prompt-for* (generic function).
put-item-on-clipboard* (generic function).
report-condition (generic function).
select-instrument* (generic function).
sound-note* (generic function).
stop-notes* (generic function).
stream-specifier (generic reader).
stream-specifier-args (generic reader).
stream-specifier-direction (generic reader).
with-standard-printing (macro).
y-or-n-question* (generic function).
Definitions are sorted by export status, category, package, and then by lexicographic order.
The number of hours in one day.
The number of minutes in one hour.
The number of seconds in one day.
The number of seconds in one hour.
The number of seconds in one minute.
The number of days in an ordinary year.
Default behavior to use when opening files if they already exist.
Used by samep to determine if two things are ’the same’. Defaults to #’equal
A list of characters that should be treated as whitespace. See, for example, [whitespacep][].
Like ’defclass-brief’ but also provides the :MAKE-LOAD-FORM-P, :EXPORT-P, :EXPORT-SLOTS, :NO-COPY, :COPY-SLOTS and :COPY-SET-SLOTS options.
A macro with simpler syntax than ‘defclass’ that allows some
briefer ways of expressing things. The syntax is more like ‘defstruct.’ A
documentation string is optional. Each slot is expressed as either a bare
symbol, or a list of the name of the slot, its initial value, a symbol with the
letters I, R, A, standing for :initarg, :reader and :accessor, and a
documentation string. The symbol, whose package is unimportant, determines the
generation of reader, accessor and so forth; the names are the same as the slot
name. All other CLOS options are processed normally.
In addition, three new class options are defined.
:AUTOMATIC-ACCESSORS means that an accessor is defined for every slot
:AUTOMATIC-INITARGS means that an initarg is defined for every slot
(:NAME-PREFIX <symbol> <separator>) (:NAME-POSTFIX <separator> <symbol>)
prepends or appends ‘symbol’ with ‘separator’
to each slot accessor. The default symbol is the class name and the default
separator is the hypen, in which case the wrapping parentheses are optional.
Create getter and setter methods for ’property’ on symbol’s property lists.
Defcondition is a handy shortcut for defining Common Lisp conditions. It supports all of #[H][define-condition]’s options and more.
Wrap a function definition with ‘deprecated’ to indicate that it should
no longer be used. If the first element of body is a string, it will be used
as additional documentation in the deprecation message. Foo example,
(deprecated
"Use bar instead."
(defun foo-1 (x)
(format t "~%FOO: ~A" x)))
Will generate the message:
; warning FOO-1 has been deprecated. Use bar instead.
at compile time whereever foo-1 is used.
Expands into an eval-when with all the fixings. It’s nothing but a shorthand.
Special handler-bind which allow two special control contructs inside of the condition handlers. resume will resume execution past the handler-bind*. retry will execute the code from body, i.e. so you usually fix the problem and then call retry.
Evaluate the body so that redefinition warnings will not be signaled. (suppored in Allegro, Clozure CL, CLisp, and Lispworks)
Signals an error saying that this function is not yet implemented. The args are ignored, but by supplying args from the calling function, you can get them ignored by the compiler.
Generate code that evaluates certain expressions only once.
This is used in macros, for computing expansions.
VARIABLE-LIST is a list of symbols, whose values are subexpressions
to be substituted into a larger expression. BODY is what uses those
symbols’ values and constructs the larger expression.
ONCE-ONLY modifies BODY so that it constructs a different expression,
which when run will evaluate the subsexpressions only once, save the
values in temporary variables, and use those from then on.
Example:
(DEFMACRO DOUBLE (ARG) ‘(+ ,ARG ,ARG)) expands into code that computes ARG twice.
(DEFMACRO DOUBLE (ARG) (ONCE-ONLY (ARG) ‘(+ ,ARG ,ARG))) will not.
Create an input stream from source and bind it to var within the body of the with-input form. The stream will be closed if necessary on exit.
Create an output stream from source and bind it to var within the body of the with-output form. The stream will be closed if necessary on exit.
Binds the symbols in VARS to gensyms. cf with-gensyms.
Using gensyms is necessary to prevent variables produced by macro expansions
from interfering with user variables, and naming them mnemonically helps make
macro expansions and compiled code easier to read, but it’s a pain to create
them properly. This macro creates them for you, which makes writing nice macros
easier. For example, if you are writing a macro to iterate over an array, you
used to have to write:
(defmacro do-2d-array ((elt array) &body body)
(let ((row (gensym "ROW"))
(col (gensym "COL")))
‘(dotimes (,row (array-dimension 0))
(dotimes (,col ,(array-dimension 1))
(let ((,elt (aref ,array ,row ,col)))
. ,body)))))
Now you can just write the following, which eliminates the need to laboriously
create the mnemonic gensyms.
(defmacro do-2d-array ((elt array) &body body)
(with-variables (row col)
‘(dotimes (,row ,(array-dimension 0))
(dotimes (,col ,(array-dimension 1))
(let ((,elt (aref ,array ,row ,col)))
. ,body))))
If the function ‘function‘ can be found in ‘package‘, then apply it
to ‘args‘.
Returns nil if ‘package‘ does not exist or if ‘function‘ does not name a function in ‘package‘. Otherwise, returns whatever ‘function‘ returns.
Returns the row’th row of array. Array is assumed to be two dimensional and row
is assumed to be in range. The returned array shared structure with the array parameter.
Present an interface to allow a choice from a list. Can throw :cancel.
Like choose-item-from-pup, but just returns the datum if it is an atom or a singleton list.
Tell lisp that now is a good time to collect any accumulated garbage.
Copies the file designated by the non-wild pathname designator FROM
to the file designated by the non-wild pathname designator TO. The following
keyword parameters are supported:
* :if-exists
this can be either :supersede or :error (the default). If it is :error then
a source/target-target-already-exists-error will be signaled if the file designated
by the TO pathname already exists.
* :if-does-not-exist
this can be either :ignore or :error (the default). If it is :error then
a source/target-source-does-not-exist-error will be signaled if the FROM pathname
designator does not exist.
Returns (if possible) the value of the file currently being loaded or from which code is currently being evaluated.
Returns the name of ‘day-of-the-week‘. The parameter should be a number between 0 and 6 where 0 represents Sunday and 6 repressents Saturday. The optional format argument can be either :long or :short. In the latter case, the return string will be of length three; in the former it will be the complete name of the appropriate day.
Returns the day of the year [1 to 366] of the specified date [which must be (CL) universal time format.]
Returns the number of days in the specified month. The month should be between 1 and 12.
Return the current default interface (this is setfable).
Returns true if and only if ‘putative-pair‘ is a dotted-list. I.e., if ‘putative-pair‘ is a cons cell with a non-nil cdr.
If ‘x‘ is a list then ensure-list returns it. Otherwise, this returns a singleton list containing ‘x‘.
Make the exported symbols in from-package be also exported from to-package.
Compares the write dates of ‘file1’ and ‘file’ and returns t if ‘file’ is newer than ‘file2’ or if it cannot be determined. ‘file1’ is usually the source file and ‘file2’ the object file.
Same as (typep arg ’fixnum). A lot of Explorer code was written using this, and it’s easier to implement it than to change them all.
Finds or interns a symbol in the keyword package whose name is formed by concatenating the pretty printed representation of the names together.
Finds or interns a symbol in the current package whose name is formed by concatenating the pretty printed representation of the names together.
Finds or interns a symbol in package whose name is formed by concatenating the pretty printed representation of the names together.
Creates and returns an uninterned symbol whose name is formed by concatenating the pretty printed representation of the names together.
Formats universal dates using the same format specifiers as NSDateFormatter. The format is:
%% - A ’%’ character
%a - Abbreviated weekday name
%A - Full weekday name
%b - Abbreviated month name
%B - Full month name
%c - Shorthand for "%X %x", the locale format for date and time
%d - Day of the month as a decimal number [01-31]
%e - Same as %d but does not print the leading 0 for days 1 through 9
[unlike strftime[], does not print a leading space]
%F - Milliseconds as a decimal number [000-999]
%H - Hour based on a 24-hour clock as a decimal number [00-23]
%I - Hour based on a 12-hour clock as a decimal number [01-12]
%j - Day of the year as a decimal number [001-366]
%m - Month as a decimal number [01-12]
%M - Minute as a decimal number [00-59]
%p - AM/PM designation for the locale
%S - Second as a decimal number [00-59]
%w - Weekday as a decimal number [0-6], where Sunday is 0
%x - Date using the date representation for the locale, including
the time zone [produces different results from strftime[]]
%X - Time using the time representation for the locale [produces
different results from strftime[]]
%y - Year without century [00-99]
%Y - Year with century [such as 1990]
%Z - Time zone name [such as Pacific Daylight Time;
produces different results from strftime[]]
%z - Time zone offset in hours and minutes from GMT [HHMM]
None of %c, %F, %x, %X, %Z are implemented.
If the function ‘function‘ can be found in ‘package‘, then funcall it
on ‘args‘.
Returns nil if ‘package‘ does not exist or if ‘function‘ does not name a function in ‘package‘. Otherwise, returns whatever ‘function‘ returns.
Returns the total amount of time that this Lisp session has spent in garbage collection.
Apply fn to lists of indexes generated from symbol counts. The counting is done so that the first symbol varies most quickly unless the optional direction parameter is set to :right.
Returns t if the specified year is a leap year. I.e. if the year is divisible by four but not by 100 or if it is divisible by 400.
Is x a list of length 1? Note that this is better than the naive (= (length x) 1) because we don’t need to traverse the entire list...
given red, green, and blue, returns an encoded rgb value
Returns the name (in English) of the month. Format can be :long or :short.
Returns true if x and y are within threshold of each other.
Returns true if ‘x‘ is within threshold of 0d0.
Create a new uninterned symbol whose print name begins with ‘prefix’, which may be a string or a symbol. This differs from ‘gensym’ in that the prefix is not sticky.
Returns a verbose-style slot specification given a brief style, consisting of
a single symbol, the name of the slot, or a list of the slot name, optional
initform, optional symbol specifying whether there is an initarg, reader, or
accessor, and optional documentation string. The specification of initarg,
reader and accessor is done by the letters I, R and A, respectively; to specify
none of those, give a symbol containing none of those letters, such as the
symbol *. This function is used in the macro ‘defclass-brief,’ but has been
broken out as a function in its own right for those writing variants on the
‘defclass’ macro. If a verbose-style slot specification is given, it is
returned unchanged.
If ‘automatic-accessors? is true, an accessor is defined, whether A is
specified or not _unless_ R is specified. If ‘automatic-initargs? is true,
an initarg is defined whether I is specified or not. If ‘name-prefix’ or
‘name-postfix’ is specified, the accessor name has that prepended or appended,
with name-separator, and the slot name in the middle.
All other CLOS slot options are processed normally.
Returns true if the logical translations of ‘p1‘ and ‘p2‘ have the same (‘string=‘) namestrings.
Chop off any name and type information from a pathname.
Returns a string representing the separator used to delimit directories in a physical pathname. For example, Digitool’s MCL would return ":" whereas OpenMCL would return "/".
Returns t if list1 and list2 are equal (as sets). If list1 and list2 are not equal returns (as multiple values) nil and two lists. The first list contains the elements in list1 and not in list2 and the second list contains elements in list2 and not in list1.
Returns true if ‘string‘ starts with ‘prefix‘.
Use the keyword argument ‘test‘ (which defaults to ‘eql‘) to check each character.
Returns true if ‘string‘ starts with ‘prefix‘.
Use the keyword argument ‘test‘ (which defaults to ‘char=‘) to check each character.
Returns the date part of the given time.
Returns the day-of-week part of the given time.
Returns the daylight-savings-time-p part of the given time.
Returns the hour part of the given time.
Returns the minute part of the given time.
Returns the month part of the given time.
Returns the second part of the given time.
Returns the year part of the given time.
Returns the total number of bytes that this Lisp session has allocated.
Returns true if ‘char‘ is an element of [+whitespace-characters+][] and nil otherwise.
Returns true is interface-name is available.
(eql nil))) ¶Returns true if thing has no fewer than length elements in it.
Returns true if thing has no more than length elements in it.
Compares two things and returns true if they are the same
in the sense of being interchangable. Tolerance indicates how close things need
to be in order to be ’the same’.
number)) ¶Quits Lisp
Compares two things and returns true if they are the same
in the sense of being interchangable. Implementations use the special variable
*samep-tolerance* to specify how close two things need to be in order to be
’the same’. See nearly-samep too.
source/target-file-error)) ¶source/target-file-error)) ¶error.
:stream-specifier
This slot is read-only.
:stream-specifier-direction
This slot is read-only.
(quote nil)
:stream-specifier-args
This slot is read-only.
General condition for file errors that have a source and target.
file-error.
common-lisp.
:source-pathname, :pathname
This slot is read-only.
(quote nil)
:target-pathname
This slot is read-only.
This error is signaled when the source file does not exist.
This error is signaled when the target pathname already exists.
Extra options to defcondition macro. Format is a list of sub-lists. Each sublist should be of length three and consists of a list of option synonyms, the default value for the option [currently ignored], and whether or not to signal an error if this option is used as an atom [currently ignored]
Default print right margin to use in with-new-file
Counter used by NEWSYM for generating print names.
Used by samep to determine how close things need to be to be ’the same’.
Similar to WITH-STANDARD-IO-SYNTAX, but doesn’t change packages.
If the function ‘function‘ can be found in ‘package‘, then call it
with ‘args‘.
Returns nil if ‘package‘ does not exist or if ‘function‘ does not name a function in ‘package‘. Otherwise, returns whatever ‘function‘ returns.
Copy into TO from FROM until end of the input stream, in blocks of *stream-buffer-size*. The streams should have the same element type.
Finalizes thing if necessary. Thing can be a class, object or symbol naming a class. Returns the class of thing.
Returns a new pathname consisting of only the name and type from a non-wild pathname.
Close a stream and handle other bookkeeping as appropriate.
Returns the value of ‘defclass*-superclasses‘ for class-name
symbol)) ¶Sets the value of ‘defclass*-superclasses‘ for class-name
symbol)) ¶Returns the class of thing or nil if the class cannot be found. Thing can be a class, an object representing a class or a symbol naming a class. Get-class is like find-class only not as particular.
Create and return a stream from specifier, direction and any other argsuments
string) (direction (eql :output)) &rest args) ¶string) (direction symbol) &rest args) ¶pathname) (direction symbol) &rest args) ¶(eql :none)) (direction symbol) &rest args) ¶(eql t)) (direction (eql :input)) &rest args) ¶(eql nil)) (direction (eql :input)) &rest args) ¶(eql nil)) (direction symbol) &rest args) ¶(eql t)) (direction symbol) &rest args) ¶stream) (direction symbol) &rest args) ¶condition) stream) ¶invalid-stream-specifier-error)) ¶invalid-stream-specifier-error)) ¶invalid-stream-specifier-error)) ¶Asks a yes or no question spiffily.
| Jump to: | (
A C D E F G H I L M N O P Q R S T W Y |
|---|
| Jump to: | (
A C D E F G H I L M N O P Q R S T W Y |
|---|
| Jump to: | *
+
C P S T |
|---|
| Jump to: | *
+
C P S T |
|---|
| Jump to: | A C D F G I L M P S |
|---|
| Jump to: | A C D F G I L M P S |
|---|