Monorepo for Aesthetic.Computer
aesthetic.computer
cl: simplify graph struct types to avoid package conflicts
+2
-2
+2
-2
fedac/native/cl/graph.lisp
+2
-2
fedac/native/cl/graph.lisp
···
4
4
5
5
(defstruct graph
6
6
"Immediate-mode 2D graphics context."
7
-
(fb nil :type (or null ac-native.framebuffer:framebuffer))
8
-
(screen nil :type (or null ac-native.framebuffer:framebuffer))
7
+
(fb nil) ; ac-native.framebuffer:framebuffer
8
+
(screen nil) ; ac-native.framebuffer:framebuffer
9
9
(ink-color (make-color :r 255 :g 255 :b 255 :a 255) :type color))
10
10
11
11
(defun graph-wipe (g color)