summaryrefslogtreecommitdiff
path: root/testsuite/tests/lib-dynlink-bytecode/plug1.ml
blob: d0490689fbe116e2732a2571182ea5a95c795ed3 (plain)
1
2
3
4
5
6
7
external stub1: unit -> string = "stub1"

let f x = print_string "This is Plug1.f\n"; x + 1

let () = Registry.register f

let () = print_endline (stub1 ())