Switch to a autotools build system and format

petri.scm

@@ -1,11 +1,12 @@
 (define-module (petri)
-  :use-module (agar core)
-  :use-module (agar gui)
-  :export (petri-app))
+  #:use-module (ice-9 format)
+  #:export (init get-error event-loop make-window make-label window-show)
+  #:replace (quit))
 
-(define-syntax-rule (petri-app exp ...)
-  (begin
-    (init-core)
-    (init-gui)
-    exp ...
-    (event-loop)))
+(load-extension "libpetri-guile" "init_petri")
+
+(define (make-window)
+  (_window-new))
+
+(define (make-label parent fmt . args)
+  (_label-new parent (apply format #f fmt args)))