Browse thread
Using findlib and a syntax extension with ocamlbuild
- Paolo Donadeo
[
Home
]
[ Index:
by date
|
by threads
]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
| Date: | -- (:) |
| From: | Paolo Donadeo <p.donadeo@g...> |
| Subject: | Using findlib and a syntax extension with ocamlbuild |
I'm fighting again with ocamlbuild. In the (excellent!) wiki I found
two useful recipes: how to use findlib with ocamlbuild and how to
compile source code using a syntax extension. Now it happens that I
have both these needs, and I'm not so sure how to mix the ingredients
and obtain a good dish.
At the moment the solution I have discovered (by trial and error)
works well, but it doesn't seem very clean.
The involved files in my source directory are these:
./xnuncc.ml
./myocamlbuild.ml
./ext_libs/openin-20070524/pa_openin.ml
./_tags
In xnuncc.ml I use the openin extension, and xnuncc.ml is the main
compilation unit.
Here is the contents of _tags and the plugin for ocamlbuild:
======= 8< CUT HERE: _tags >8 =======
<dom> or <files> or <fragment_composer> or <test> or <doc> : include
<ext_libs/openin-20070524> : include
true : dtypes
<**/pa_openin.ml> : camlp4of, use_camlp4of
"xnuncc.ml" : camlp4o, use_openin
======= 8< END HERE: _tags >8 =======
======= 8< CUT HERE: myocamlbuild.ml >8 =======
open Ocamlbuild_plugin;;
open Command;;
let packages = "str,netstring,oUnit,extlib";;
let ocamlfind cmd = S[A"ocamlfind"; A cmd; A"-package"; A packages];;
flag ["ocaml"; "link"] (A"-linkpkg");;
dispatch begin function
| After_options ->
Options.ocamlc := ocamlfind "ocamlc";
Options.ocamlopt := ocamlfind "ocamlopt";
| After_rules ->
ocaml_lib ~extern:true ~dir:"+camlp4" "camlp4of";
flag ["ocaml"; "pp"; "use_openin"]
(A"ext_libs/openin-20070524/pa_openin.cmo");
dep ["ocaml"; "ocamldep"; "use_openin"]
["ext_libs/openin-20070524/pa_openin.cmo"];
| _ -> ()
end
======= 8< END HERE: myocamlbuild.ml >8 =======
As I wrote this works, but the aspect I don't like is why I have to
specify the full path of "ext_libs/openin-20070524/pa_openin.cmo"
instead of a simple "pa_openin.cmo", inside myocamlbuild.ml. Including
the directory "ext_libs/openin-20070524" in the _tags file does't seem
to be enough.
If I use "pa_openin.cmo", indeed, the result is an absurd (for me)
error message starting with:
======= 8< CUT HERE: error message >8 =======
Ocamlbuild knows of no rules that apply to a target named
ext_libs/openin-20070524/xnuncc.d.ml. This can happen if you ask
Ocamlbuild to build a target with the wrong extension (e.g. .opt
instead of .native) or if the source files live in directories that
have not been specified as include directories.
Backtrace:
- Failed to build the target xnuncc.d.byte
- Failed to build all of these:
- Building ext_libs/openin-20070524/xnuncc.d.byte:
- Failed to build all of these:
- Building ext_libs/openin-20070524/xnuncc.d.cmo:
- Failed to build all of these:
- Building ext_libs/openin-20070524/xnuncc.d.ml
- Building ext_libs/openin-20070524/xnuncc.ml:
- Failed to build all of these:
- Building ext_libs/openin-20070524/xnuncc.mly
... ... ...
======= 8< END HERE: error message >8 =======
At the end of the story the question is: is this solution the best
possible for compiling a project with findlib and a syntax extension
present in a subdir of the project?
TIA,
--
Paolo
Paolo Donadeo, Senior Software Engineer
Studio Associato 4Sigma
Email: p.donadeo@4sigma.it
~
~
:wq