Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@perlpilot
Created July 23, 2010 18:19
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save perlpilot/487820 to your computer and use it in GitHub Desktop.
Save perlpilot/487820 to your computer and use it in GitHub Desktop.
$ cat o1
IN> 1+2*3-4**3**2
MATCH> 1+2*3-4**3**2
sum
mul pow val => 1
0 => +
mul
pow val => 2
0 => *
pow val => 3
1 => -
mul pow
val => 4
pow
val => 3
pow val => 2
sum
mul pow val => 1
0 => +
mul
pow val => 2
0 => *
pow val => 3
1 => -
mul pow
val => 4
pow
val => 3
pow val => 2
/home/duff/tmp
$ cat o2
IN> 1+2*3-4**3**2
MATCH> 1+2*3-4**3**2
sum
0 => +
1 => -
mul pow
val => 4
pow
val => 3
pow val => 2
sum
0 => +
1 => -
mul pow
val => 4
pow
val => 3
pow val => 2
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment