Commit 640f1920 authored by gerd's avatar gerd

Updated


git-svn-id: https://godirepo.camlcity.org/svn/lib-pxp/trunk@356 dbe99aee-44db-0310-b2b3-d33182c8eb97
parent f50cc456
(* $Id: compile.ml,v 1.5 2001/05/17 22:38:27 gerd Exp $
(* $Id: compile.ml,v 1.6 2001/06/08 00:02:59 gerd Exp $
* ----------------------------------------------------------------------
*
*)
......@@ -54,7 +54,7 @@ let compile in_filename out_filename print super_root pis comments =
let ch = open_out out_filename in
Pxp_codewriter.write_document ch tree;
output_string ch "(create_document (new Pxp_types.drop_warnings) Pxp_yacc.default_spec) # write (Pxp_types.Out_channel stdout) `Enc_utf8;;\n";
output_string ch "(create_document { Pxp_yacc.default_config with Pxp_yacc.encoding = `Enc_utf8 } Pxp_yacc.default_spec) # write (Pxp_types.Out_channel stdout) `Enc_utf8;;\n";
close_out ch;
if print then
......@@ -111,6 +111,9 @@ if !error_happened then exit(1);;
* History:
*
* $Log: compile.ml,v $
* Revision 1.6 2001/06/08 00:02:59 gerd
* Updated
*
* Revision 1.5 2001/05/17 22:38:27 gerd
* Updated.
*
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment