Data update

2026-02-01 16:33:20 -08:00 · 2026-02-01 16:33:20 -08:00 · 4bb20c9b71
commit 4bb20c9b71
parent 5150844a7d
7735 changed files with 38060 additions and 199180 deletions
--- a/Task/Hostname/COBOL/hostname.cobol
+++ b/Task/Hostname/COBOL/hostname.cobol
@ -1,15 +0,0 @@
-       identification division.
-       program-id. hostname.
-
-       data division.
-       working-storage section.
-       01 hostname pic x(256).
-       01 nullpos  pic 999 value 1.
-
-       procedure division.
-       call "gethostname" using hostname by value length of hostname
-       string hostname delimited by low-value into hostname
-           with pointer nullpos
-       display "Host: " hostname(1 : nullpos - 1)
-       goback.
-       end program hostname.