grug.in (456B)
1 #!@GUILE@ --no-auto-compile 2 !# 3 4 (define-syntax-rule (push! elt v) (set! v (cons elt v))) 5 6 ;; Automatically add Grug modules to Guile's load path so that users 7 ;; aren't wondering why Grug isn't working when the modules aren't 8 ;; installed to Guile's default module locations. 9 (unless (getenv "GRUG_UNINSTALLED") 10 (push! "@guilemoduledir@" %load-path) 11 (push! "@guileobjectdir@" %load-compiled-path)) 12 13 (use-modules (grug ui)) 14 15 (apply main (command-line))