HardenedBSD/contrib/bc/Test/mul.b

scale = 20
for (i=0; i<10000; i++) {
  for (j=1; j<100; j++) b=i*j
}
b
for (i=0; i<10000; i++) {
  for (j=1000000000000000000000000000000000000000000000000000000000000000000; \
       j<1000000000000000000000000000000000000000000000000000000000000000100; \
       j++) b=i*j
}
b
quit
Import GNU bc 1.04 PR: 4183 1998-04-29 23:53:01 +02:00			`scale = 20`
Initial import of bc 1.0.6 2001-02-26 08:13:00 +01:00			`for (i=0; i<10000; i++) {`
Import GNU bc 1.04 PR: 4183 1998-04-29 23:53:01 +02:00			`for (j=1; j<100; j++) b=i*j`
			`}`
			`b`
Initial import of bc 1.0.6 2001-02-26 08:13:00 +01:00			`for (i=0; i<10000; i++) {`
			`for (j=1000000000000000000000000000000000000000000000000000000000000000000; \`
			`j<1000000000000000000000000000000000000000000000000000000000000000100; \`
			`j++) b=i*j`
			`}`
			`b`
Import GNU bc 1.04 PR: 4183 1998-04-29 23:53:01 +02:00			`quit`