Add fdiv (/)

Author: danluu

toy.ml

@@ -11,6 +11,7 @@ let main () =
   Hashtbl.add Parser.binop_precedence '<' 10;
   Hashtbl.add Parser.binop_precedence '+' 20;
   Hashtbl.add Parser.binop_precedence '-' 20;
+  Hashtbl.add Parser.binop_precedence '/' 40;
   Hashtbl.add Parser.binop_precedence '*' 40;    (* highest. *)
 
   (* Prime the first token. *)