projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add Gdk/Windows and refactor a bit
[cl-gtk2.git]
/
gdk
/
gdk.gc.lisp
diff --git
a/gdk/gdk.gc.lisp
b/gdk/gdk.gc.lisp
index
575a26f
..
9b274e2
100644
(file)
--- a/
gdk/gdk.gc.lisp
+++ b/
gdk/gdk.gc.lisp
@@
-22,12
+22,12
@@
(export (boxed-related-symbols 'gc-values))
(export (boxed-related-symbols 'gc-values))
-(defcfun (graphics-context-new "gdk_gc_new") (g-object graphics-context)
+(defcfun (graphics-context-new "gdk_gc_new") (g-object graphics-context :already-referenced)
(drawable (g-object drawable)))
(export 'graphics-context-new)
(drawable (g-object drawable)))
(export 'graphics-context-new)
-(defcfun (graphics-context-new-with-values "gdk_gc_new_with_values") (g-object graphics-context)
+(defcfun (graphics-context-new-with-values "gdk_gc_new_with_values") (g-object graphics-context :already-referenced)
(drawable (g-object drawable))
(values (g-boxed-foreign gc-values))
(values-mask gc-values-mask))
(drawable (g-object drawable))
(values (g-boxed-foreign gc-values))
(values-mask gc-values-mask))