diff options
| -rw-r--r-- | awklib/eg/lib/intdiv0.awk | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/awklib/eg/lib/intdiv0.awk b/awklib/eg/lib/intdiv0.awk new file mode 100644 index 00000000..9de5978e --- /dev/null +++ b/awklib/eg/lib/intdiv0.awk @@ -0,0 +1,23 @@ +# intdiv0 --- do integer division + +# +# Arnold Robbins, arnold@skeeve.com, Public Domain +# July, 2014 +# +# Name changed from div() to intdiv() +# April, 2015 +# +# Changed to intdiv0() +# April, 2016 + +function intdiv0(numerator, denominator, result) +{ + split("", result) + + numerator = int(numerator) + denominator = int(denominator) + result["quotient"] = int(numerator / denominator) + result["remainder"] = int(numerator % denominator) + + return 0.0 +} |