Original bug ID: 1519
Reporter: administrator
Status: closed
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)

Bug description

Bonjour,

Il me semble que certains fichier nécessaires à la création de DLL
utilisant les bigarrays ne sont pas installés pour le port Mingw.

D'après ce que j'ai compris, on a libcamlrun.a qui est une
bibliothèque statique, ocamlrun.a la bibliothèque dynamique et
ocamlrun.dll le DLL. Les deux premières sont installées dans
$OCAMLLIB, la troisième dans le $PATH.

Par contre pour bigarray, on n'a que la lib statique dans $OCAMLLIB et
le DLL dans $OCAMLLIB/stublibs. La lib dynamique est effacée après la
création du DLL. Or, on en a besoin si on veut faire un DLL stub
utilisant les bigarrays (pour `alloc_bigarray'), non ?

Bonjour,

Je vois que le Makefile a été modifié mais il faut aussi déclarer en
CAMLextern alloc_bigarray' et alloc_bigarray_dims' il me semble.

--
Olivier

Index: bigarray.h

RCS file: /caml/ocaml/otherlibs/bigarray/bigarray.h,v
retrieving revision 1.5
diff -u -r1.5 bigarray.h
--- bigarray.h 2002/02/10 17:01:27 1.5
+++ bigarray.h 2003/01/13 14:29:33
@@ -68,8 +68,8 @@

#define Data_bigarray_val(v) (Bigarray_val(v)->data)

-extern value alloc_bigarray(int flags, int num_dims, void * data, long * dim);
-extern value alloc_bigarray_dims(int flags, int num_dims, void * data,
+CAMLextern value alloc_bigarray(int flags, int num_dims, void * data, long * dim);
+CAMLextern value alloc_bigarray_dims(int flags, int num_dims, void * data,
... /*dimensions, with type long */);

#endif
Index: bigarray_stubs.c

RCS file: /caml/ocaml/otherlibs/bigarray/bigarray_stubs.c,v
retrieving revision 1.15
diff -u -r1.15 bigarray_stubs.c
--- bigarray_stubs.c 2002/10/17 14:43:09 1.15
+++ bigarray_stubs.c 2003/01/13 14:29:33
@@ -85,7 +85,7 @@
[data] cannot point into the Caml heap.
[dim] may point into an object in the Caml heap.
/
-value alloc_bigarray(int flags, int num_dims, void * data, long * dim)
+CAMLextern value alloc_bigarray(int flags, int num_dims, void * data, long * dim)
{
long num_elts, size;
int i;
@@ -121,7 +121,7 @@
/ Same as alloc_bigarray, but dimensions are passed as a list of
arguments */

-value alloc_bigarray_dims(int flags, int num_dims, void * data, ...)
+CAMLextern value alloc_bigarray_dims(int flags, int num_dims, void * data, ...)
{
va_list ap;
long dim[MAX_NUM_DIMS];