[OCaml] (PR10016) Add a few missing line in OCamlLangImpl2.rst

[oota-llvm.git] / docs / tutorial / OCamlLangImpl2.rst

diff --git a/docs/tutorial/OCamlLangImpl2.rst b/docs/tutorial/OCamlLangImpl2.rst
index 83a22ab22d4f438d73fed8a6aa2346ec7a754fb1..905b306746f1fd670c2ba4200ba8bc91281e6bfd 100644 (file)
--- a/docs/tutorial/OCamlLangImpl2.rst
+++ b/docs/tutorial/OCamlLangImpl2.rst
@@ -339,6 +339,9 @@ expression:
             (* Eat the binop. *)
             Stream.junk stream;
 
             (* Eat the binop. *)
             Stream.junk stream;
 

+            (* Parse the primary expression after the binary operator *)
+            let rhs = parse_primary stream in
+

             (* Okay, we know this is a binop. *)
             let rhs =
               match Stream.peek stream with
             (* Okay, we know this is a binop. *)
             let rhs =
               match Stream.peek stream with