File tree Expand file tree Collapse file tree 2 files changed +12
-0
lines changed Expand file tree Collapse file tree 2 files changed +12
-0
lines changed Original file line number Diff line number Diff line change @@ -771,4 +771,8 @@ module For_compatibility_only = struct
771771 external caml_js_to_byte_string : js_string t -> string = " caml_js_to_byte_string"
772772
773773 external caml_js_to_string : js_string t -> string = " caml_js_to_string"
774+
775+ external caml_list_of_js_array : 'a js_array t -> 'a list = " caml_list_of_js_array"
776+
777+ external caml_list_to_js_array : 'a list -> 'a js_array t = " caml_list_to_js_array"
774778end
Original file line number Diff line number Diff line change @@ -192,6 +192,14 @@ void caml_list_mount_point () {
192192 fprintf (stderr , "Unimplemented Javascript primitive caml_list_mount_point!\n" );
193193 exit (1 );
194194}
195+ void caml_list_of_js_array () {
196+ fprintf (stderr , "Unimplemented Javascript primitive caml_list_of_js_array!\n" );
197+ exit (1 );
198+ }
199+ void caml_list_to_js_array () {
200+ fprintf (stderr , "Unimplemented Javascript primitive caml_list_to_js_array!\n" );
201+ exit (1 );
202+ }
195203void caml_ml_set_channel_output () {
196204 fprintf (stderr , "Unimplemented Javascript primitive caml_ml_set_channel_output!\n" );
197205 exit (1 );
You can’t perform that action at this time.
0 commit comments