Remove jbuilder_ prefix for vendored libraries (#720)

It's not useful since we are not installing them. Also unwrap
libraries that are unwrapped upstream.
This commit is contained in:
Jérémie Dimino 2018-04-24 14:38:30 +01:00 committed by GitHub
parent bc2a375e2c
commit 239ff0054e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
18 changed files with 40 additions and 52 deletions

View File

@ -1,5 +1,5 @@
(executable (executable
((name main) ((name main)
(public_name jbuilder) (public_name jbuilder)
(libraries (unix jbuilder jbuilder_cmdliner)) (libraries (unix jbuilder cmdliner))
(preprocess no_preprocessing))) (preprocess no_preprocessing)))

View File

@ -1,11 +1,11 @@
open Jbuilder open Jbuilder
open Import open Import
open Jbuilder_cmdliner.Cmdliner open Cmdliner
open Fiber.O open Fiber.O
(* Things in src/ don't depend on cmdliner to speed up the bootstrap, so we set this (* Things in src/ don't depend on cmdliner to speed up the bootstrap, so we set this
reference here *) reference here *)
let () = suggest_function := Jbuilder_cmdliner.Cmdliner_suggest.value let () = suggest_function := Cmdliner_suggest.value
type common = type common =
{ debug_dep_path : bool { debug_dep_path : bool

View File

@ -1,3 +1,3 @@
open Import open Import
val parse_string : string -> (Jbuilder_re.Re.t, int * string) result val parse_string : string -> (Re.t, int * string) result

View File

@ -1,5 +1,4 @@
{ {
open Jbuilder_re
open Re open Re
let no_slash = diff any (char '/') let no_slash = diff any (char '/')

View File

@ -1,5 +1,4 @@
include Stdune include Stdune
include Jbuilder_re
include Errors include Errors
(* To make bug reports usable *) (* To make bug reports usable *)

View File

@ -7,8 +7,8 @@
stdune stdune
fiber fiber
xdg xdg
jbuilder_re re
jbuilder_opam_file_format opam_file_format
usexp usexp
ocaml_config)) ocaml_config))
(synopsis "Internal Jbuilder library, do not use!"))) (synopsis "Internal Jbuilder library, do not use!")))

View File

@ -1,5 +1,4 @@
open Import open Import
open Jbuilder_opam_file_format
open OpamParserTypes open OpamParserTypes
type t = opamfile type t = opamfile

View File

@ -1,6 +1,6 @@
(** Parsing and interpretation of opam files *) (** Parsing and interpretation of opam files *)
open Jbuilder_opam_file_format.OpamParserTypes open OpamParserTypes
(** Type of opam files *) (** Type of opam files *)
type t = opamfile type t = opamfile

View File

@ -1,6 +1,4 @@
open Import open Import
open Jbuilder_opam_file_format
open Fiber.O open Fiber.O
let is_a_source_file fn = let is_a_source_file fn =

View File

@ -1,27 +0,0 @@
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

View File

@ -1,6 +0,0 @@
module Re = struct
type t = unit
type re = unit
let compile () = ()
let execp _ _ = false
end

6
vendor/boot/opamBaseParser.ml vendored Normal file
View File

@ -0,0 +1,6 @@
open OpamParserTypes
let main _lex _lexbuf fn =
assert (fn = "jbuilder.opam");
{ file_contents = []
; file_name = fn
}

2
vendor/boot/opamLexer.ml vendored Normal file
View File

@ -0,0 +1,2 @@
exception Error of string
let token _ = assert false

13
vendor/boot/opamParserTypes.ml vendored Normal file
View File

@ -0,0 +1,13 @@
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
}

4
vendor/boot/re.ml vendored Normal file
View File

@ -0,0 +1,4 @@
type t = unit
type re = unit
let compile () = ()
let execp _ _ = false

View File

@ -1,6 +1,7 @@
(jbuild_version 1) (jbuild_version 1)
(library (library
((name jbuilder_cmdliner) ((name cmdliner)
(libraries (caml)) (libraries (caml))
(flags (-w -3-6-27-32-33-35-50 -open Caml)))) (wrapped false)
(flags (-w -3-6-27-32-33-35-50 -open Caml))))

View File

@ -1,7 +1,8 @@
(jbuild_version 1) (jbuild_version 1)
(library (library
((name jbuilder_opam_file_format))) ((name opam_file_format)
(wrapped false)))
(ocamllex (opamLexer)) (ocamllex (opamLexer))
(ocamlyacc (opamBaseParser)) (ocamlyacc (opamBaseParser))

View File

@ -1,7 +1,6 @@
(jbuild_version 1) (jbuild_version 1)
(library (library
((name jbuilder_re) ((name re)
;; (public_name jbuilder.re) (flags (:standard -w -50))
(flags (:standard -w -50)) (synopsis "Internal Jbuilder library, do not use!")))
(synopsis "Internal Jbuilder library, do not use!")))