summaryrefslogtreecommitdiff
path: root/testsuite/tests/lib-dynlink-native/b.ml
blob: afa1bef05186b5be93bcd92b26375ebf5afcd6d4 (plain)
1
2
3
4
let () =
  print_endline "B is running";
  incr A.x;
  Printf.printf "A.x = %i\n" !A.x