projects
/
cl-gtk2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Merge commit 'ae006838093cfeb67b3818526622fb5cb61d5300' of git://github.com/scymtym...
[cl-gtk2.git]
/
gtk
/
gtk.markup.lisp
1
(in-package :gtk)
2
3
(defcfun |g_markup_escape_text| :string
4
(raw :string)
5
(size :int))
6
7
(defun markup-escape-text (raw)
8
(cffi:with-foreign-string (s raw)
9
(|g_markup_escape_text| s (length raw))))
10
11
(export 'markup-escape-text)