13 lines
224 B
Scheme
13 lines
224 B
Scheme
(use-modules (agar core))
|
|
(use-modules (agar gui))
|
|
|
|
(init-core)
|
|
(init-gui)
|
|
|
|
(define my-window (make-window))
|
|
(define my-label (make-label my-window))
|
|
(set-label-text my-label "Hi Agar")
|
|
|
|
(show-window my-window)
|
|
(event-loop)
|