Paste: humble childhood of a new stack inferencer

Author: rien
Mode: factor
Date: Sat, 17 Dec 2011 22:51:12
Plain Text | 
IN: scratchpad [ \ dup \ * \ + "unused" ] steps-infer dup [ pop ] [ pop ] bi . . length 26 - abs .
"(+ \"b\" \"(* \"a\" \"a\")\")"
"unused"
2
IN: scratchpad [ \ dup \ * \ + ] steps-infer dup pop . length 26 - abs .
"(+ \"b\" \"(* \"a\" \"a\")\")"
2

New Annotation

Summary:
Author:
Mode:
Body: