#! /bin/sh
exec guile -s "$0" 
!#

(setenv "GNC_UNINSTALLED" "1")
(use-modules (gnucash gnc-module))
(gnc:module-system-init)

(if (gnc:module-load "gnucash/app-utils" 0)
    (begin    
      (if (and (procedure? gnc:error->string)
               (procedure? gnc-default-currency)
	       (macro? N_)
	       (string=? (N_ "foobar") "foobar"))
          (exit 0)
          (exit -1)))
    (exit -1))


