view interps/linguine/int.lng @ 7338:dc90590d7dcd

<rdococ> misle/rn @/|n@| = -n; |@+k| = -1 - k/@
author HackBot
date Fri, 01 Apr 2016 02:15:06 +0000
parents 859f9b4339e6
children
line wrap: on
line source

'ASCII digit to integer conversion (positive values only)
'Programmed by Jeffry Johnston, 2005
1[1?,1~10:2,0+*0,2=*0,0+*0,0+*0,0+*2,0+*1,0-48]1
2[0#]0