Corrected Makefile.rkt

2026-11-02 08:26:32 +01:00
parent abc5464c78
commit 6d04443349
1 changed files with 39 additions and 35 deletions
@@ -1,46 +1,50 @@
-#lang racket-makefile
+#lang racket

-(require git
+(require git-cli
+         racket-makefile
         package-zipper)

-(target all
-        (displayln "main branch: use (make clean) or (make package)"))

-(target clean
-        (for-each (λ (f) (displayln f) (rm-f f)) (list-files "." #px"([.]bak|~)$" #:recursive #t))
-        (for-each (λ (d) (displayln d) (rm-rf d)) (list-dirs "." #px"(compiled|doc)$" #:recursive #t))
-        (when (directory-exists? "scrbl")
-          (for-each (λ (f) (displayln f) (rm-f f)) (list-files "scrbl" #px"[.](css|js|html)$")))
-        )
+(makefile 'racket-audio-native-libs
          
-(target package
-        (deps clean)
-        (zip-package))
+          (target 'all
+                  (displayln "main branch: use (make clean) or (make package)"))

-(target housekeeping
-        (displayln "Committing changes for:")
-        (let ((changes (git 'status)))
-          (when (> (length changes) 0)
-            (dgit 'status)
-            (displayln "Adding...")
-            (dgit 'add '-A)
-            (displayln "Committing...")
-            (dgit 'commit (git-prompt))
-            (displayln "Pushing...")
-            (dgit 'push)))
-        )
+          (target 'clean
+                  (for-each (λ (f) (displayln f) (rm-f f)) (list-files "." #px"([.]bak|~)$" #:recursive #t))
+                  (for-each (λ (d) (displayln d) (rm-rf d)) (list-dirs "." #px"(compiled|doc)$" #:recursive #t))
+                  (when (directory-exists? "scrbl")
+                    (for-each (λ (f) (displayln f) (rm-f f)) (list-files "scrbl" #px"[.](css|js|html)$")))
+                  )

-(target windows
-        (deps housekeeping)
-        (displayln "Switching to x86_64-win32")
-        (dgit 'switch "x86_64-win32"))
+          (target 'package
+                  (deps 'clean)
+                  (zip-package))

-(target linux-x86_64
-        (deps housekeeping)
-        (displayln "Switching to x86_64-linux")
-        (dgit 'switch "x86_64-linux"))
+          (target 'housekeeping
+                  (displayln "Committing changes for:")
+                  (let ((changes (git 'status)))
+                    (when (> (length changes) 0)
+                      (git 'status)
+                      (displayln "Adding...")
+                      (git 'add '-A)
+                      (displayln "Committing...")
+                      (git 'commit)
+                      (displayln "Pushing...")
+                      (git 'push)))
+                  )

-(target linux
-        (deps linux-x86_64))
+          (target 'windows
+                  (deps 'housekeeping)
+                  (displayln "Switching to x86_64-win32")
+                  (git 'switch "x86_64-win32"))

+          (target 'linux-x86_64
+                  (deps 'housekeeping)
+                  (displayln "Switching to x86_64-linux")
+                  (git 'switch "x86_64-linux"))

+          (target 'linux
+                  (deps 'linux-x86_64))
+
+          )