projects
/
cl-gtk2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
2d52efb
)
Write GStrv type as a 'list of string' in doc/skeleton
author
Dmitry Kalyanov
<Kalyanov.Dmitry@gmail.com>
Sat, 12 Sep 2009 18:59:18 +0000
(22:59 +0400)
committer
Dmitry Kalyanov
<Kalyanov.Dmitry@gmail.com>
Sat, 12 Sep 2009 18:59:18 +0000
(22:59 +0400)
doc/skeleton.lisp
patch
|
blob
|
history
diff --git
a/doc/skeleton.lisp
b/doc/skeleton.lisp
index
9b110e3
..
0699720
100644
(file)
--- a/
doc/skeleton.lisp
+++ b/
doc/skeleton.lisp
@@
-198,6
+198,7
@@
(defun type-string-f (type)
(let ((l (ensure-list type)))
(case (first l)
(defun type-string-f (type)
(let ((l (ensure-list type)))
(case (first l)
+ (glib:gstrv "list of @code{string}")
((:string glib:g-string) "@code{string}")
((:int :uint :long :ulong :char :uchar :int64 :uint64) "@code{integer}")
((:boolean :bool) "@code{boolean}")
((:string glib:g-string) "@code{string}")
((:int :uint :long :ulong :char :uchar :int64 :uint64) "@code{integer}")
((:boolean :bool) "@code{boolean}")
@@
-213,6
+214,7
@@
(defun type-string-s (type)
(cond
(defun type-string-s (type)
(cond
+ ((g-type= type "GStrv") "list of @code{string}")
((g-type= type +g-type-string+) "@code{string}")
((g-type= type +g-type-boolean+) "@code{boolean}")
((g-type= type +g-type-float+) "@code{single-float}")
((g-type= type +g-type-string+) "@code{string}")
((g-type= type +g-type-boolean+) "@code{boolean}")
((g-type= type +g-type-float+) "@code{single-float}")