@verb #144:":toint" this none this rxdo #55
@program #144:":toint" this none this
bignum = this.value
r = 0
typeof(bignum) == $STR && (bignum = decode_binary(bignum, 1))
for x in [1..length(bignum)]
  r = r * 256
  r = r + bignum[x]
endfor
return r
"Last modified by manta (#7165) on Tue Mar  6 08:46:00 2001 MST."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:06 2002 MDT)."
"Last modified by Dax (#789) on Tue May  3 14:03:26 2005 MDT."
.