Source file `svg.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
# 1 "src/svg/svg_cairo/svg.no_cairo.ml"
type config = unit

let has_cairo = false

let get_config ~filename:_ ~dirs:_ = ()

let dump_svg ~svg_output:_ _ ~index:_ _ ~config:_ =
  Logs.warn
    UtilsLib.PPUtils.(
    fun m -> m
               "The@ %a@ command@ sets@ a@ svg@ output@ \
                file@, but@ the@ %a@ opam@ package@ is@ \
                not@ installed.@ No@ svg@ can@ be@ produced.@ This@ \
                option@ is@ ignored."
                fun_pp
                "realize"
                binary_pp
                "cairo2"
    )