This is the clim-widgets Reference Manual, version 0.3.1, generated automatically by Declt version 4.0 beta 2 "William Riker" on Sun Dec 08 17:38:03 2024 GMT+0.
The main system appears first, followed by any subsystem dependency.
clim-widgets
small collection of clim widgets
BSD Simplified
0.3.1
mcclim
(system).
simple-date-time
(system).
local-time
(system).
perlre
(system).
nsort
(system).
cl-fad
(system).
closer-mop
(system).
manifest
(system).
package.lisp
(file).
cw-utils.lisp
(file).
clim-widgets.lisp
(file).
calendar.lisp
(file).
clock.lisp
(file).
tree-view.lisp
(file).
cw-examples.lisp
(file).
Files are sorted by type and then listed depth-first from the systems components trees.
clim-widgets/clim-widgets.asd
clim-widgets/package.lisp
clim-widgets/cw-utils.lisp
clim-widgets/clim-widgets.lisp
clim-widgets/calendar.lisp
clim-widgets/clock.lisp
clim-widgets/tree-view.lisp
clim-widgets/cw-examples.lisp
clim-widgets/cw-utils.lisp
package.lisp
(file).
clim-widgets
(system).
clim-widgets/clim-widgets.lisp
cw-utils.lisp
(file).
clim-widgets
(system).
clim-widgets/calendar.lisp
clim-widgets.lisp
(file).
clim-widgets
(system).
calendar
(function).
update-instance-for-redefined-class
(method).
cal
(class).
change-m
(function).
change-m%parser
(function).
change-y
(function).
change-y%parser
(function).
d
(reader method).
(setf d)
(writer method).
days
(special variable).
define-cal-command
(macro).
disp-day-nr
(macro).
disp-fn
(macro).
get-date
(function).
get-date%parser
(function).
layout1
(function).
layout2
(function).
m
(reader method).
(setf m)
(writer method).
mp
(macro).
reinitialize-panes-and-layouts
(method).
s
(macro).
start
(function).
switch-layout
(function).
switch-layout%parser
(function).
todays-date
(function).
todays-date%parser
(function).
y
(reader method).
(setf y)
(writer method).
clim-widgets/clock.lisp
calendar.lisp
(file).
clim-widgets
(system).
clock
(function).
digital-clock-eu
(function).
clim-widgets/tree-view.lisp
clock.lisp
(file).
clim-widgets
(system).
childnode-is-youngestsibling
(method).
children
(method).
children
(reader method).
children
(method).
(setf children)
(writer method).
define-node-methods
(macro).
display-tree
(method).
group
(reader method).
(setf group)
(writer method).
item-name
(method).
item-name
(method).
item-name
(method).
item-name
(method).
item-name
(method).
leaf
(class).
list-dir
(function).
name
(reader method).
(setf name)
(writer method).
node
(class).
node-p
(generic function).
tree
(class).
tree-view
(function).
treeview
(function).
update-instance-for-redefined-class
(method).
bar
(function).
bar%
(function).
d
(symbol macro).
dashed-lines
(special variable).
define-tree-command
(macro).
disp-tree
(method).
disp-tree
(method).
disp-tree
(method).
draw-icon
(function).
get-children
(generic function).
grid
(special variable).
grid
(method).
icon
(special variable).
indent
(reader method).
(setf indent)
(writer method).
item
(class).
leaf-fs
(class).
m
(function).
node-fs
(class).
p
(function).
plus
(function).
pointr
(function).
pointr%
(function).
ptype
(reader method).
(setf ptype)
(writer method).
rect
(function).
reinitialize-panes-and-layouts
(method).
show-children
(reader method).
(setf show-children)
(writer method).
spc
(function).
toggle
(method).
tri-m
(function).
tri-p
(function).
triangle
(function).
triangle2
(function).
txt-size
(function).
txt-size%parser
(function).
txtsize
(reader method).
(setf txtsize)
(writer method).
youngest-child
(reader method).
(setf youngest-child)
(writer method).
clim-widgets/cw-examples.lisp
tree-view.lisp
(file).
clim-widgets
(system).
childnode-is-youngestsibling
(method).
childnode-is-youngestsibling
(method).
children
(method).
children
(method).
children
(method).
item-name
(method).
item-name
(method).
item-name
(method).
item-name
(method).
item-name
(method).
item-name
(method).
node-p
(method).
node-p
(method).
update-instance-for-redefined-class
(method).
update-instance-for-redefined-class
(method).
update-instance-for-redefined-class
(method).
class-browser
(class).
class-browser1
(function).
class-browser2
(function).
define-class-browser-command
(macro).
define-icd9it-command
(macro).
define-pkg-doc-command
(macro).
disp-pkg-info
(method).
filter-with-init
(function).
get-children
(method).
get-children
(method).
get-children
(method).
group-by-first-letter
(function).
ht
(special variable).
icd-test
(function).
icd9it
(class).
icds
(special variable).
info
(reader method).
info
(reader method).
info
(reader method).
(setf info)
(writer method).
(setf info)
(writer method).
(setf info)
(writer method).
leaf-88
(class).
leaf-cb
(class).
leaf-pkg
(class).
node-88
(class).
node-cb
(class).
node-pkg
(class).
packages
(function).
packages%parser
(function).
pkg-doc
(function).
pkg-doc
(class).
pkg-list
(special variable).
present-symbols%%
(function).
proc
(macro).
reinitialize-panes-and-layouts
(method).
reinitialize-panes-and-layouts
(method).
reinitialize-panes-and-layouts
(method).
run-all-examples
(function).
show-childreno
(method).
show-childreno
(method).
show-info
(function).
show-info%parser
(function).
stgtree
(special variable).
symtree
(special variable).
view-deb-available
(function).
view-deb-installed
(function).
view-exe
(function).
xx
(function).
xx%parser
(function).
xxx
(function).
xxx%parser
(function).
Packages are listed by definition order.
cw-clock
clim
.
clim-lisp
.
clock
(function).
digital-clock-eu
(function).
cw-examples
clim
.
clim-lisp
.
clim-widgets
.
class-browser
(class).
class-browser1
(function).
class-browser2
(function).
define-class-browser-command
(macro).
define-icd9it-command
(macro).
define-pkg-doc-command
(macro).
disp-pkg-info
(generic function).
filter-with-init
(function).
group-by-first-letter
(function).
ht
(special variable).
icd-test
(function).
icd9it
(class).
icds
(special variable).
info
(generic reader).
(setf info)
(generic writer).
leaf-88
(class).
leaf-cb
(class).
leaf-pkg
(class).
node-88
(class).
node-cb
(class).
node-pkg
(class).
packages
(function).
packages%parser
(function).
pkg-doc
(function).
pkg-doc
(class).
pkg-list
(special variable).
present-symbols%%
(function).
proc
(macro).
run-all-examples
(function).
show-childreno
(generic function).
show-info
(function).
show-info%parser
(function).
stgtree
(special variable).
symtree
(special variable).
view-deb-available
(function).
view-deb-installed
(function).
view-exe
(function).
xx
(function).
xx%parser
(function).
xxx
(function).
xxx%parser
(function).
clim-widgets
cw
clim
.
clim-lisp
.
cw-calendar
.
cw-clock
.
cw-treeview
.
cw-utils
.
cw-calendar
clim
.
clim-lisp
.
calendar
(function).
cal
(class).
change-m
(function).
change-m%parser
(function).
change-y
(function).
change-y%parser
(function).
d
(generic reader).
(setf d)
(generic writer).
days
(special variable).
define-cal-command
(macro).
disp-day-nr
(macro).
disp-fn
(macro).
get-date
(function).
get-date%parser
(function).
layout1
(function).
layout2
(function).
m
(generic reader).
(setf m)
(generic writer).
mp
(macro).
s
(macro).
start
(function).
switch-layout
(function).
switch-layout%parser
(function).
todays-date
(function).
todays-date%parser
(function).
y
(generic reader).
(setf y)
(generic writer).
cw-treeview
clim
.
clim-lisp
.
cw-utils
.
childnode-is-youngestsibling
(generic function).
children
(generic function).
(setf children)
(generic writer).
define-node-methods
(macro).
display-tree
(generic function).
group
(generic reader).
(setf group)
(generic writer).
item-name
(generic function).
leaf
(class).
list-dir
(function).
name
(generic reader).
(setf name)
(generic writer).
node
(class).
node-p
(generic function).
tree
(class).
tree-view
(function).
treeview
(function).
bar
(function).
bar%
(function).
d
(symbol macro).
dashed-lines
(special variable).
define-tree-command
(macro).
disp-tree
(generic function).
draw-icon
(function).
get-children
(generic function).
grid
(special variable).
grid
(generic function).
icon
(special variable).
indent
(generic reader).
(setf indent)
(generic writer).
item
(class).
leaf-fs
(class).
m
(function).
node-fs
(class).
p
(function).
plus
(function).
pointr
(function).
pointr%
(function).
ptype
(generic reader).
(setf ptype)
(generic writer).
rect
(function).
show-children
(generic reader).
(setf show-children)
(generic writer).
spc
(function).
toggle
(generic function).
tri-m
(function).
tri-p
(function).
triangle
(function).
triangle2
(function).
txt-size
(function).
txt-size%parser
(function).
txtsize
(generic reader).
(setf txtsize)
(generic writer).
youngest-child
(generic reader).
(setf youngest-child)
(generic writer).
Definitions are sorted by export status, category, package, and then by lexicographic order.
Define subclasses of node and leaf CLASSES with corresponding METHODS to get the childs of a node.
All these classes and methods can also be defined, subclassed, etc. in the normal way.
Keyword arguments:
:nc node class
:cc children class
:nn node name
:ln leaf name
:gc supply a form that returns a list of a node’s children ### ev cl for children-list <—-
:cp supply a form to test if a child is node or leaf
:cy supply a function to test for equality o child nodes
See view directory for an example usage
transform a symbol-tree into a downcase string-tree
tree to hash-table, key is a superior, val is a list of inferiors
insert into an emtpy ht
view a tree
test if child is node or leaf
icd9it
) as ds pl &rest initargs) ¶class-browser
) as ds pl &rest initargs) ¶pkg-doc
) as ds pl &rest initargs) ¶cal
) as ds pl &rest initargs) ¶tree
) as ds pl &rest initargs) ¶item
.
list of children with attributes such as indentation, node or leaf, youngest-child
t
:youngest-child
boolean
:show-children
standard-application-frame
.
Initarg | Value |
---|---|
:name | (quote tree) |
:pretty-name | tree |
:command-table | (find-command-table (quote tree)) |
:disabled-commands | (quote nil) |
:menu-bar | (quote t) |
:pointer-documentation | (quote nil) |
:current-layout | (quote default) |
:layouts | (quote ((default single-pane))) |
:resize-frame | (quote nil) |
:top-level-lambda | (lambda (frame-arg0) (default-frame-top-level frame-arg0)) |
:panes-constructor | (lambda (fm frame) (or (frame-panes-for-layout frame) (setf (frame-panes-for-layout frame) (with-look-and-feel-realization (fm frame) (list (cons (quote single-pane) (coerce-pane-name (make-pane (quote application-pane) display-function (quote display-tree) incremental-redisplay t end-of-line-action allow end-of-page-action allow) (quote single-pane)))))))) |
:layout-constructor | (lambda (fm frame) (disown-frame-panes fm frame) (let ((named-panes (frame-panes-for-layout frame))) (declare (ignorable named-panes)) (let ((single-pane (assoc-value named-panes (quote single-pane) test (function eq)))) (declare (ignorable single-pane)) (setf (frame-panes frame) (ecase (frame-current-layout frame) (default single-pane))))) (adopt-frame-panes fm frame (frame-current-layout frame)) (update-frame-pane-lists frame)) |
:normal
group is an object of a node-class
:group
:ptype
dec 60, doz 72
recursive pack every leaf-node into parentheses
returns the start-date, i.e. the first of 7x6=42 dates, as an instance e.g #<SIMPLE-DATE-TIME:DATE-TIME 2014-07-27 00:00:00.000 {100654EAF3}>
list executables on a linux computer
This presents the item’s name
leaf
) pt s indent) ¶This displays grid and pointer of a leaf-item
get a list of children
pkg-doc
)) ¶automatically generated reader method
info
.
class-browser
)) ¶automatically generated reader method
info
.
pkg-doc
)) ¶automatically generated writer method
info
.
class-browser
)) ¶automatically generated writer method
info
.
class-browser
) p) ¶class-browser
)) ¶clim-internals
.
standard-application-frame
.
Initarg | Value |
---|---|
:name | (quote cal) |
:pretty-name | cal |
:command-table | (find-command-table (quote cal)) |
:disabled-commands | (quote nil) |
:menu-bar | (quote t) |
:pointer-documentation | (quote nil) |
:current-layout | (quote c1) |
:layouts | (quote ((c1 cal1) (c2 cal2))) |
:resize-frame | (quote nil) |
:top-level-lambda | (lambda (frame-arg0) (default-frame-top-level frame-arg0)) |
:panes-constructor | (lambda (fm frame) (or (frame-panes-for-layout frame) (setf (frame-panes-for-layout frame) (with-look-and-feel-realization (fm frame) (list (cons (quote cal1) (coerce-pane-name (mp layout1) (quote cal1))) (cons (quote cal2) (coerce-pane-name (mp layout2) (quote cal2)))))))) |
:layout-constructor | (lambda (fm frame) (disown-frame-panes fm frame) (let ((named-panes (frame-panes-for-layout frame))) (declare (ignorable named-panes)) (let ((cal1 (assoc-value named-panes (quote cal1) test (function eq))) (cal2 (assoc-value named-panes (quote cal2) test (function eq)))) (declare (ignorable cal1 cal2)) (setf (frame-panes frame) (ecase (frame-current-layout frame) (c1 cal1) (c2 cal2))))) (adopt-frame-panes fm frame (frame-current-layout frame)) (update-frame-pane-lists frame)) |
tree
.
Initarg | Value |
---|---|
:name | (quote class-browser) |
:pretty-name | class-browser |
:command-table | (find-command-table (quote class-browser)) |
:disabled-commands | (quote nil) |
:menu-bar | (quote tree) |
:pointer-documentation | (quote nil) |
:current-layout | (quote double) |
:layouts | (quote ((double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))) |
:resize-frame | (quote nil) |
:top-level-lambda | (lambda (frame-arg0) (default-frame-top-level frame-arg0)) |
:panes-constructor | (lambda (fm frame) (or (frame-panes-for-layout frame) (setf (frame-panes-for-layout frame) (with-look-and-feel-realization (fm frame) (list (cons (quote tree) (make-clim-application-pane name (quote tree) display-function (quote display-tree) incremental-redisplay t end-of-line-action allow end-of-page-action allow)) (cons (quote info) (make-clim-application-pane name (quote info) display-function (quote show-childreno) incremental-redisplay t end-of-line-action allow end-of-page-action allow))))))) |
:layout-constructor | (lambda (fm frame) (disown-frame-panes fm frame) (let ((named-panes (frame-panes-for-layout frame))) (declare (ignorable named-panes)) (let ((tree (assoc-value named-panes (quote tree) test (function eq))) (info (assoc-value named-panes (quote info) test (function eq)))) (declare (ignorable tree info)) (setf (frame-panes frame) (ecase (frame-current-layout frame) (double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))))) (adopt-frame-panes fm frame (frame-current-layout frame)) (update-frame-pane-lists frame)) |
tree
.
Initarg | Value |
---|---|
:name | (quote icd9it) |
:pretty-name | icd9it |
:command-table | (find-command-table (quote icd9it)) |
:disabled-commands | (quote nil) |
:menu-bar | (quote tree) |
:pointer-documentation | (quote nil) |
:current-layout | (quote double) |
:layouts | (quote ((double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))) |
:resize-frame | (quote nil) |
:top-level-lambda | (lambda (frame-arg0) (default-frame-top-level frame-arg0)) |
:panes-constructor | (lambda (fm frame) (or (frame-panes-for-layout frame) (setf (frame-panes-for-layout frame) (with-look-and-feel-realization (fm frame) (list (cons (quote tree) (make-clim-application-pane name (quote tree) display-function (quote display-tree) incremental-redisplay t end-of-line-action allow end-of-page-action allow)) (cons (quote info) (make-clim-application-pane name (quote info) display-function (quote show-childreno) incremental-redisplay t))))))) |
:layout-constructor | (lambda (fm frame) (disown-frame-panes fm frame) (let ((named-panes (frame-panes-for-layout frame))) (declare (ignorable named-panes)) (let ((tree (assoc-value named-panes (quote tree) test (function eq))) (info (assoc-value named-panes (quote info) test (function eq)))) (declare (ignorable tree info)) (setf (frame-panes frame) (ecase (frame-current-layout frame) (double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))))) (adopt-frame-panes fm frame (frame-current-layout frame)) (update-frame-pane-lists frame)) |
tree
.
Initarg | Value |
---|---|
:name | (quote pkg-doc) |
:pretty-name | pkg-doc |
:command-table | (find-command-table (quote pkg-doc)) |
:disabled-commands | (quote nil) |
:menu-bar | (quote t) |
:pointer-documentation | (quote nil) |
:current-layout | (quote double) |
:layouts | (quote ((double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))) |
:resize-frame | (quote nil) |
:top-level-lambda | (lambda (frame-arg0) (default-frame-top-level frame-arg0)) |
:panes-constructor | (lambda (fm frame) (or (frame-panes-for-layout frame) (setf (frame-panes-for-layout frame) (with-look-and-feel-realization (fm frame) (list (cons (quote tree) (make-clim-application-pane name (quote tree) display-function (quote display-tree) incremental-redisplay t end-of-line-action allow end-of-page-action allow)) (cons (quote info) (make-clim-application-pane name (quote info) display-function (quote disp-pkg-info) incremental-redisplay t))))))) |
:layout-constructor | (lambda (fm frame) (disown-frame-panes fm frame) (let ((named-panes (frame-panes-for-layout frame))) (declare (ignorable named-panes)) (let ((tree (assoc-value named-panes (quote tree) test (function eq))) (info (assoc-value named-panes (quote info) test (function eq)))) (declare (ignorable tree info)) (setf (frame-panes frame) (ecase (frame-current-layout frame) (double (horizontally nil tree (make-pane (quote box-adjuster-gadget)) info)))))) (adopt-frame-panes fm frame (frame-current-layout frame)) (update-frame-pane-lists frame)) |
Jump to: | (
B C D F G H I K L M N P R S T U V X Y |
---|
Jump to: | (
B C D F G H I K L M N P R S T U V X Y |
---|
Jump to: | C D G H I M N P S T Y |
---|
Jump to: | C D G H I M N P S T Y |
---|
Jump to: | C F I L N P S T |
---|
Jump to: | C F I L N P S T |
---|