benchmarks/bc/bitfuncs.bc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

#! /usr/bin/bc -lq

scale = 0
max = 10000

print "scale = 0\n"

for (i = 0; i < max; ++i) {

	a = rand()
	b = rand()

	print "band(", a, ", ", b, ")\n"
	print "bor(", a, ", ", b, ")\n"
	print "bxor(", a, ", ", b, ")\n"
	print "blshift(", a, ", ", b % 32, ")\n"
	print "brshift(", a, ", ", b % 32, ")\n"
}