repos
/
qt.examples
/ annotate_shade
summary
|
shortlog
|
log
|
tree
|
commit
|
commitdiff
|
headdiff
|
annotate
|
filehistory
normal
|
plain
|
shade
|
zebra
Testrun examples on commit
Annotate for file tests/test.lisp
2009-05-24 tobias
1
(in-package :qt.examples)
15:00:42 '
2
'
3
(let ((qt:*exec-p* nil))
'
4
(do-external-symbols (example :qt.examples)
'
5
(when (fboundp example)
'
6
(format *debug-io* "testing ~A~%"
'
7
(documentation (symbol-function example)
'
8
'function))
'
9
(funcall (symbol-function example)))))