Switch to a autotools build system and format
This commit is contained in:
9
examples/hello-world.scm
Normal file
9
examples/hello-world.scm
Normal file
@@ -0,0 +1,9 @@
|
||||
(use-modules (petri))
|
||||
|
||||
(define (main . args)
|
||||
(init "Hello world!" 0)
|
||||
(let* ([win (make-window)]
|
||||
[label (make-label win "Hello world!")])
|
||||
(window-show win)
|
||||
(event-loop))
|
||||
(quit))
|
||||
Reference in New Issue
Block a user