test-suite/misc/non-marshalable-state/src/evil.mlg


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

DECLARE PLUGIN "evil_plugin"

{

let state = Summary.ref
  ~name:"elpi-compiler-cache"
  None

}

VERNAC COMMAND EXTEND magic CLASSIFIED AS SIDEFF
| [ "magic" ] -> {
    state := Some (fun () -> ())
}
END