commit 2583ce9

include modules, adapt to new assemble.sh

1@@ -3,7 +3,7 @@
2 f=dull.scm
3 printf "#!/bin/guile\n!#\n"> $f
4 
5-for i in pkg cmd main
6+for i in module pkg cmd main
7 do
8     {
9 	printf ";; $i.scm\n\n" >> $f

 1@@ -1,9 +1,4 @@
 2 ;; (open-input-pipe (format #t "echo ~a" (cadr (command-line))))
 3-(define-module (cmd)
 4-  #:use-module (ice-9 popen)
 5-  #:use-module (ice-9 rdelim)
 6-  #:export (_system _warn die info msg find-pkg)
 7-)
 8 
 9 (define (_system . a)
10   (let* ((p (apply open-pipe* OPEN_READ a))

1@@ -1,6 +1,3 @@
2-(use-modules (cmd)
3-	     (pkg))
4-
5 (_warn "this will be some sort of libdmake.sh helper in guile")
6 (_system "ls" "/")
7 (inst-pkg "goonapp")

1@@ -0,0 +1,3 @@
2+(use-modules
3+ (ice-9 popen)
4+ (ice-9 rdelim))

 1@@ -1,10 +1,3 @@
 2-(define-module (pkg)
 3-  #:use-module (cmd)
 4-  #:use-module (ice-9 popen)
 5-  #:use-module (ice-9 rdelim)
 6-  #:export (inst-pkg build-pkg)
 7-)
 8-
 9 ;; note #f, its for expressions
10 ;; everything will be stubbed todat because i need to implement
11 ;; package finding and shit