comparison src/urweb.grm @ 964:fbc3a0eef45a

Paging mostly working; just need to get it working properly with filtering
author Adam Chlipala <adamc@hcoop.net>
date Sat, 19 Sep 2009 14:21:25 -0400
parents 8e540df3294d
children 10114d7b7477
comparison
equal deleted inserted replaced
963:6f9d1565de56 964:fbc3a0eef45a
936 | eexp NE eexp (native_op ("ne", eexp1, eexp2, s (eexp1left, eexp2right))) 936 | eexp NE eexp (native_op ("ne", eexp1, eexp2, s (eexp1left, eexp2right)))
937 | MINUS eterm (native_unop ("neg", eterm, s (MINUSleft, etermright))) 937 | MINUS eterm (native_unop ("neg", eterm, s (MINUSleft, etermright)))
938 | eexp PLUS eexp (native_op ("plus", eexp1, eexp2, s (eexp1left, eexp2right))) 938 | eexp PLUS eexp (native_op ("plus", eexp1, eexp2, s (eexp1left, eexp2right)))
939 | eexp MINUS eexp (native_op ("minus", eexp1, eexp2, s (eexp1left, eexp2right))) 939 | eexp MINUS eexp (native_op ("minus", eexp1, eexp2, s (eexp1left, eexp2right)))
940 | eterm STAR eexp (native_op ("times", eterm, eexp, s (etermleft, eexpright))) 940 | eterm STAR eexp (native_op ("times", eterm, eexp, s (etermleft, eexpright)))
941 | eexp DIVIDE eexp (native_op ("div", eexp1, eexp2, s (eexp1left, eexp2right))) 941 | eexp DIVIDE eexp (native_op ("divide", eexp1, eexp2, s (eexp1left, eexp2right)))
942 | eexp MOD eexp (native_op ("mod", eexp1, eexp2, s (eexp1left, eexp2right))) 942 | eexp MOD eexp (native_op ("mod", eexp1, eexp2, s (eexp1left, eexp2right)))
943 943
944 | eexp LT eexp (native_op ("lt", eexp1, eexp2, s (eexp1left, eexp2right))) 944 | eexp LT eexp (native_op ("lt", eexp1, eexp2, s (eexp1left, eexp2right)))
945 | eexp LE eexp (native_op ("le", eexp1, eexp2, s (eexp1left, eexp2right))) 945 | eexp LE eexp (native_op ("le", eexp1, eexp2, s (eexp1left, eexp2right)))
946 | eexp GT eexp (native_op ("gt", eexp1, eexp2, s (eexp1left, eexp2right))) 946 | eexp GT eexp (native_op ("gt", eexp1, eexp2, s (eexp1left, eexp2right)))