28 lines
561 B
OCaml
28 lines
561 B
OCaml
module OpamParserTypes = struct
|
|
type value =
|
|
| String of unit * string
|
|
| List of unit * value list
|
|
| Other
|
|
|
|
type opamfile_item =
|
|
| Variable of unit * string * value
|
|
| Other
|
|
|
|
type opamfile =
|
|
{ file_contents : opamfile_item list
|
|
; file_name : string
|
|
}
|
|
end
|
|
module OpamBaseParser = struct
|
|
open OpamParserTypes
|
|
let main _lex _lexbuf fn =
|
|
assert (fn = "jbuilder.opam");
|
|
{ file_contents = []
|
|
; file_name = fn
|
|
}
|
|
end
|
|
module OpamLexer = struct
|
|
exception Error of string
|
|
let token _ = assert false
|
|
end
|