LXR busybox/testsuite/bc

   1define f() {
   2        "ibase:";ibase
   3        a=A;a
   4        a=F;a
   5        a=G;a
   6        a=Z;a
   7        a=0A;a
   8        a=0F;a
   9        a=0G;a
  10        a=0Z;a
  11}
  12f()
  13ibase=9;f()
  14ibase=A;f()
  15ibase=F;f()
  16ibase=G;f()
  17#ibase=Z;f()
  18halt
  19