diff options
| author | jdolecek <jdolecek@NetBSD.org> | 2004-03-26 17:16:24 +0000 |
|---|---|---|
| committer | jdolecek <jdolecek@NetBSD.org> | 2004-03-26 17:16:24 +0000 |
| commit | 0c4ea4cbc71acb15c231028ac6363473ecf29621 (patch) | |
| tree | 91b4c7bf491ec8a639e22914f066f23441eb381e /gnu/dist/gawk/awklib/eg/lib/bits2str.awk | |
| parent | 945c30f4abe102fcc8f1cb32e13335809f39056e (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.awk | 16 |
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 -} |
