[OCaml] Some OCaml documentation fixes

Fix some typos.

Update some filenames after 8f7bc4cc10
(replace example_prog.ml with runme.ml).

[skip ci]
This commit is contained in:
Zackery Spytz 2019-01-27 04:00:31 -07:00
commit fba77056de

View file

@ -142,7 +142,7 @@ Use <tt>ocamlc</tt> or <tt>ocamlopt</tt> to compile your SWIG interface like:
<div class="code"> <div class="code">
<pre> <pre>
% swig -ocaml -co swig.mli ; swig -ocaml co swig.ml % swig -ocaml -co swig.mli ; swig -ocaml -co swig.ml
% ocamlc -c swig.mli ; ocamlc -c swig.ml % ocamlc -c swig.mli ; ocamlc -c swig.ml
% ocamlc -c -ccopt "-I/usr/include/foo" example_wrap.c % ocamlc -c -ccopt "-I/usr/include/foo" example_wrap.c
% ocamlc -c example.mli % ocamlc -c example.mli
@ -336,7 +336,7 @@ appended. Upon return to caml space, the fnhelper function
beautifies the result. A list containing a single item degrades to beautifies the result. A list containing a single item degrades to
only that item (i.e. [ C_int 3 ] -&gt; C_int 3), and a list only that item (i.e. [ C_int 3 ] -&gt; C_int 3), and a list
containing more than one item is wrapped in C_list (i.e. [ C_char containing more than one item is wrapped in C_list (i.e. [ C_char
'a' ; C_char 'b' -&gt; C_list [ C_char 'a' ; C_char b 'a' ; C_char 'b' ] -&gt; C_list [ C_char 'a' ; C_char 'b'
]). This is in order to make return values easier to handle ]). This is in order to make return values easier to handle
when functions have only one return value, such as constructors, when functions have only one return value, such as constructors,
and operators. In addition, string, pointer, and object and operators. In addition, string, pointer, and object
@ -660,7 +660,7 @@ module.
</p> </p>
<div class="code"><pre> <div class="code"><pre>
bash-2.05a$ ./example_top bash-2.05a$ ./runme_top
Objective Caml version 3.06 Objective Caml version 3.06
Camlp4 Parsing version 3.06 Camlp4 Parsing version 3.06
@ -835,7 +835,7 @@ an overloaded class. This example is contained in Examples/ocaml/shapes.
<table border="1" bgcolor="#dddddd" summary="Director usage example"> <table border="1" bgcolor="#dddddd" summary="Director usage example">
<tr><th><center>example_prog.ml</center> <tr><th><center>runme.ml</center>
</th></tr> </th></tr>
<tr><td><pre> <tr><td><pre>
open Swig open Swig
@ -854,13 +854,15 @@ let triangle_class pts ob meth args =
| _ -&gt; raise (Failure "cover needs two double arguments.")) | _ -&gt; raise (Failure "cover needs two double arguments."))
| _ -&gt; (invoke ob) meth args ;; | _ -&gt; (invoke ob) meth args ;;
...
let triangle = let triangle =
new_derived_object new_derived_object
new_shape new_shape
(triangle_class ((0.0, 0.0), (0.5, 1.0), (1.0, 0.0))) (triangle_class ((0.0, 0.0), (0.5, 1.0), (1.0, 0.6)))
'() ;; '() ;;
let _ = _draw_shape_coverage '(triangle, C_int 60, C_int 20) ;; let _ = _draw_shape_coverage '(triangle, 60, 20) ;;
</pre></td></tr> </pre></td></tr>
</table> </table>