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
Added more utilities: WITH-INIT, WIDTH-OF, HEIGHT-OF, and WITH-BOUND-IMAGE.
[cl-devil.git]
/
package.lisp
blob
10e3d4608d47ba71eef72b648289a1493c504bce
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
#:
COPY-IMAGE
16
#:
COPY-PIXELS
17
#:
DELETE-IMAGES
18
#:
GEN-IMAGES
19
#:
GET-DATA
20
#:
GET-ERROR
21
#:
GET-INTEGER
22
#:
INIT
23
#:
LOAD
24
#:
LOAD-F
25
#:
LOAD-IMAGE
26
#:
LOAD-L
27
#:
OVERLAY-IMAGE
28
#:
SAVE
29
#:
SAVE-F
30
#:
SAVE-IMAGE
31
#:
SAVE-L
32
#:
SET-DATA
33
#:
SET-PIXELS
34
#:
SHUTDOWN
35
#:
TEX-IMAGE
36
))
37
38
(
defpackage
#:
ilut
39
(:
use
#:
cl
#:
cffi
)
40
(:
export
41
#:
CONVERT-TO-SDL-SURFACE
42
#:
DISABLE
43
#:
ENABLE
44
#:
GET-BOOLEAN
45
#:
GL-BIND-MIPMAPS
46
#:
GL-BIND-TEX-IMAGE
47
#:
GL-BUILD-MIPMAPS
48
#:
GL-LOAD-IMAGE
49
#:
GL-SAVE-IMAGE
50
#:
GL-SCREEN
51
#:
GL-SCREENIE
52
#:
GL-SET-TEX
53
#:
GL-SUB-TEX
54
#:
GL-TEX-IMAGE
55
#:
RENDERER
56
#:
SDL-SURFACE-FROM-BITMAP
57
#:
SDL-SURFACE-LOAD-IMAGE
58
))