this repo has no description
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

More static

+8 -1
+2
dune
··· 1 1 (executable 2 2 (name opentrace) 3 3 (public_name opentrace) 4 + (preprocess (pps ppx_blob)) 5 + (preprocessor_deps (file opentrace.bpf.o)) 4 6 (libraries unix libbpf libbpf_maps)) 5 7 6 8 (rule
+5 -1
opentrace.ml
··· 2 2 open Libbpf_maps 3 3 4 4 let obj_path = "opentrace.bpf.o" 5 + let obj_file = [%blob "opentrace.bpf.o"] 5 6 6 7 let program_names = 7 8 [ ··· 55 56 end 56 57 57 58 let () = 59 + let dir = Filename.temp_dir "opentrace-" "" in 60 + let full_obj_path = Filename.concat dir obj_path in 61 + Out_channel.with_open_bin full_obj_path (fun oc -> Out_channel.output_string oc obj_file); 58 62 let bpf_callback obj _links = 59 63 (* Set signal handlers *) 60 64 let exitting = ref true in ··· 83 87 () 84 88 done 85 89 in 86 - with_bpf_object_open_load_link ~obj_path ~program_names bpf_callback 90 + with_bpf_object_open_load_link ~obj_path:full_obj_path ~program_names bpf_callback
+1
opentrace.opam
··· 10 10 "ocaml" 11 11 "libbpf" 12 12 "libbpf_maps" 13 + "ppx_blob" 13 14 "odoc" {with-doc} 14 15 ] 15 16 build: [