commit 3ea1757
chld
·
2026-08-15 05:09:16 +0000 UTC
parent 0b8b60c
kinda implement pkg idk man im sleep
A
pkg.scm
+12,
-0
1@@ -0,0 +1,12 @@
2+(define-module (pkg)
3+ #:use-module (cmd)
4+ #:use-module (ice-9 popen)
5+ #:use-module (ice-9 rdelim)
6+ #:export (inst)
7+)
8+
9+;; note #f, its for expressions
10+;; everything will be stubbed todat because i need to implement
11+;; package finding and shit
12+
13+(define (inst pkg) (msg (format #f "installing ~a" pkg)))
M
test.scm
+4,
-1
1@@ -1,5 +1,8 @@
2-(use-modules (cmd))
3+(use-modules (cmd)
4+ (pkg))
5
6 (_warn "this will be some sort of libdmake.sh helper in guile")
7 (_system "ls" "/")
8+(inst "goonapp")
9+(display (getenv "HOME"))(newline)
10 (die "error")