Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Newer
Older
100644 38 lines (25 sloc) 0.899 kB
aa66fc9 LP-ized visual/
pad authored
1 (*s: flag_visual.ml *)
8634b74 initial import into fresh git repo.
pad authored
2
3 let verbose_visual = ref false
4
5 (* was 0.4, but on linux the anti-aliasing seems to not be as good
6 * as on mac (possibly because I have only an old cairo lib on my
7 * Linux machine
8 *)
9 let threshold_draw_content_font_size_real = ref
10 0.6
11
12 (* big and auto-generated files can take too much time to render *)
13 let threshold_draw_content_nblines =
8ba2de1 visual: visualizing .web knuth files, especially to view TeX sources
pad authored
14 ref 25000.
8634b74 initial import into fresh git repo.
pad authored
15
16 let threshold_draw_label_font_size_real = ref
17 10.
18
19 let threshold_nb_rects_draw_content = ref 2500
20
830e6d9 @aryx * visual/flag_visual.ml: augment the threshold for #entities before d…
aryx authored
21 let threshold_too_many_entities = ref 600000
8634b74 initial import into fresh git repo.
pad authored
22
23 let top_n = ref 100
24
ca5f0a3 pfff_visual: adding a -bl that boost label size and alpha. Useful
pad authored
25 let boost_label_size = ref false
26
8634b74 initial import into fresh git repo.
pad authored
27 let debug_gc = ref false
28
29 (* Ancient does not interact well with hashtbl and ocaml polymorphic
30 * equality and hash. Have to use a functorized hashtbl which sucks.
31 *)
32 let use_ancient = ref false
33
34 let disable_fonts = ref false
35
36 let extra_filter = ref (None: string option) (* regexp *)
aa66fc9 LP-ized visual/
pad authored
37 (*e: flag_visual.ml *)
Something went wrong with that request. Please try again.