summaryrefslogtreecommitdiff
path: root/gnu/dist/gawk/awklib/eg/lib/bits2str.awk
diff options
context:
space:
mode:
authorjdolecek <jdolecek@NetBSD.org>2004-03-26 17:16:24 +0000
committerjdolecek <jdolecek@NetBSD.org>2004-03-26 17:16:24 +0000
commit0c4ea4cbc71acb15c231028ac6363473ecf29621 (patch)
tree91b4c7bf491ec8a639e22914f066f23441eb381e /gnu/dist/gawk/awklib/eg/lib/bits2str.awk
parent945c30f4abe102fcc8f1cb32e13335809f39056e (diff)
delete GNU gawk 3.1.3 sources. they are available in cvs with
"cvs co -r gawk-3-1-3-before-remove src/gnu/dist/gawk".
Diffstat (limited to 'gnu/dist/gawk/awklib/eg/lib/bits2str.awk')
-rw-r--r--gnu/dist/gawk/awklib/eg/lib/bits2str.awk16
1 files changed, 0 insertions, 16 deletions
diff --git a/gnu/dist/gawk/awklib/eg/lib/bits2str.awk b/gnu/dist/gawk/awklib/eg/lib/bits2str.awk
deleted file mode 100644
index 9725ee8fa7d..00000000000
--- a/gnu/dist/gawk/awklib/eg/lib/bits2str.awk
+++ /dev/null
@@ -1,16 +0,0 @@
-# bits2str --- turn a byte into readable 1's and 0's
-
-function bits2str(bits, data, mask)
-{
- if (bits == 0)
- return "0"
-
- mask = 1
- for (; bits != 0; bits = rshift(bits, 1))
- data = (and(bits, mask) ? "1" : "0") data
-
- while ((length(data) % 8) != 0)
- data = "0" data
-
- return data
-}