typo

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3646 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02

bytecomp/bytelink.ml

@@ -428,7 +428,7 @@ let build_custom_runtime prim_name exec_name =
       remove_file (Filename.chop_suffix prim_name ".c" ^ ".obj");
       retcode
   | "MacOS" ->
-      and cppc = "mrc"
+      let cppc = "mrc"
       and libsppc = "\"{sharedlibraries}MathLib\" \
                      \"{ppclibraries}PPCCRuntime.o\" \
                      \"{ppclibraries}PPCToolLibs.o\" \

stdlib/arg.ml

@@ -69,7 +69,7 @@ let parse speclist anonfun errmsg =
           eprintf "%s: %s.\n" progname s
     end;
     usage speclist errmsg;
-    if error = Unknow "-help" || error = Unknown "--help"
+    if error = Unknown "-help" || error = Unknown "--help"
     then exit 0
     else exit 2
   in