repo.or.cz
/
cl-devil.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge branch 'master' of ssh://repo.or.cz/srv/git/cl-devil
[cl-devil.git]
/
package.lisp
blob
af0c509885fa57293fc2fcb4a2cda827c8b5ed09
1
2
(
defpackage
#:
cl-devil
3
(:
nicknames
#:
il
)
4
(:
use
#:
cl
#:
cffi
:
anaphora
)
5
(:
shadow
#:
load
#:
error
)
6
(:
export
7
#:
with-bound-image
8
#:
with-images
9
#:
with-init
10
#:
width-of
11
#:
height-of
12
;; bindings
13
#:
BIND-IMAGE
14
#:
BLIT
15
#:
CONVERT-IMAGE
16
#:
COPY-IMAGE
17
#:
COPY-PIXELS
18
#:
DELETE-IMAGES
19
#:
DETERMINE-TYPE
20
#:
DISABLE
21
#:
ENABLE
22
#:
ENABLED-P
23
#:
FLIP-IMAGE
24
#:
GEN-IMAGES
25
#:
GET-DATA
26
#:
GET-ERROR
27
#:
GET-INTEGER
28
#:
GET-PALETTE
29
#:
INIT
30
#:
IS-ENABLED
31
#:
KEY-COLOR
32
#:
LOAD
33
#:
LOAD-F
34
#:
LOAD-IMAGE
35
#:
LOAD-L
36
#:
OVERLAY-IMAGE
37
#:
SAVE
38
#:
SAVE-F
39
#:
SAVE-IMAGE
40
#:
SAVE-L
41
#:
SET-DATA
42
#:
SET-INTEGER
43
#:
SET-PIXELS
44
#:
SHUTDOWN
45
#:
TEX-IMAGE
46
))
47
48
(
defpackage
#:
ilut
49
(:
use
#:
cl
#:
cffi
)
50
(:
export
51
#:
CONVERT-TO-SDL-SURFACE
52
#:
DISABLE
53
#:
ENABLE
54
#:
GET-BOOLEAN
55
#:
GL-BIND-MIPMAPS
56
#:
GL-BIND-TEX-IMAGE
57
#:
GL-BUILD-MIPMAPS
58
#:
GL-LOAD-IMAGE
59
#:
GL-SAVE-IMAGE
60
#:
GL-SCREEN
61
#:
GL-SCREENIE
62
#:
GL-SET-TEX
63
#:
GL-SUB-TEX
64
#:
GL-TEX-IMAGE
65
#:
INIT
66
#:
RENDERER
67
#:
SDL-SURFACE-FROM-BITMAP
68
#:
SDL-SURFACE-LOAD-IMAGE
69
))