Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Get-system-command-output/Forth/get-system-command-output.fth
+++ b/Task/Get-system-command-output/Forth/get-system-command-output.fth
@ -0,0 +1,9 @@
+s" ps " system                                 \ Output  only
+                                 \ read via pipe  into buffer
+create buffer 266 allot
+s" ps " r/o open-pipe   throw
+dup buffer swap  256 swap
+read-file throw
+swap close-pipe throw drop
+
+buffer swap  type          \ output  is the  same  like  above