Aded extended commands and editor

This commit is contained in:
2026-08-20 23:48:49 +02:00
parent 72bf39a27b
commit 4324da1467
12 changed files with 1616 additions and 261 deletions
+5 -1
View File
@@ -9,7 +9,7 @@
(provide pwd ls mkdir rmdir rm cp mv cat touch echo which
head tail wc sort uniq cut tee tr basename dirname realpath readlink
stat du df mktemp printenv env date help raco)
stat du df mktemp printenv env date time edit help raco)
(define (make-command-procedure name)
(λ args
@@ -45,6 +45,8 @@
(define printenv-command (make-command-procedure 'printenv))
(define env-command (make-command-procedure 'env))
(define date-command (make-command-procedure 'date))
(define time-command (make-command-procedure 'time))
(define edit-command (make-command-procedure 'edit))
(define raco-command coreutils-raco)
(define (help-command . args)
@@ -131,5 +133,7 @@
(define-pipeline-alias printenv (make-coreutils-alias #'printenv-command))
(define-pipeline-alias env (make-env-alias #'env-command))
(define-pipeline-alias date (make-coreutils-alias #'date-command))
(define-pipeline-alias time (make-coreutils-alias #'time-command))
(define-pipeline-alias edit (make-coreutils-alias #'edit-command))
(define-pipeline-alias help (make-coreutils-alias #'help-command))
(define-pipeline-alias raco (make-coreutils-alias #'raco-command))