Source file data_files.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
type file =
  | Slipshow_js
  | Scheduler_js
  | Pdf_support
  | Slip_internal_css
  | Slip_system_css
  | Favicon
  | Mathjax_js
  | Tachyons_css

let read f = match f with
  | Slipshow_js -> [%blob "../src/engine/runtime/slipshow.js"]
  | Scheduler_js -> [%blob "../src/engine/scheduler/scheduler.bc.js"]
  | Slip_internal_css -> [%blob "../src/engine/runtime/slipshow-internal.css"]
  | Slip_system_css -> [%blob "../src/engine/runtime/slipshow-system.css"]
  | Pdf_support -> [%blob "../src/engine/pdf-support/pdf_support.bc.js"]
  | Mathjax_js -> [%blob "tex-svg-full.js"]
  | Favicon -> [%blob "../logo/favicon.ico"]
  | Tachyons_css -> [%blob "tachyons-4.12.0.min.css"]