Further simplify Remakefile. Remove some inefficiency in module dependency checking...
[tatoo.git] / tools / ocamlmoduledep.sh
index 3bab186..2833671 100755 (executable)
@@ -4,23 +4,28 @@
 PROG="$0"
 CMDLINE="$*"
 usage() {
-    echo "$PROG [-native] [-I dir .. -I dir] Module"
+    echo "$PROG [-inter] [-native] [-I dir .. -I dir] Module"
 }
 
 INCLUDES=""
 MODULES=""
 NATIVE=0
+INTER=0
+OCAMLWHERE=$(ocamlc -where)
 while true; do
     case $1 in
         -I)
-            dir=`echo "$2" | sed "s:^+:$(ocamlc -where)/:"`
+            dir=`echo "$2" | sed "s:^+:${OCAMLWHERE}/:"`
             INCLUDES="$INCLUDES
-$2"
+$dir"
             shift
             ;;
         -native)
             NATIVE=1
             ;;
+        -inter)
+            INTER=1
+            ;;
         [A-Z]*)
                 MODULES="$MODULES $1"
             ;;
@@ -39,16 +44,23 @@ else
     ext=cmo
 fi
 
+
 for MODULE in $MODULES; do
-    module="$(echo $MODULE | cut -b1 | tr A-Z a-z)$(echo $MODULE | cut -b2-)"
+    module="$(echo ${MODULE} | sed -e 's:\(.*\):\l\1:')"
     echo "$INCLUDES" | while read include; do
-        base="$include/$module"
-        if test -z "$include"; then continue; fi
-        if test -f "$base".ml -o -f "$base".mly -o -f "$base".mll -o -f "$base".pack; then
-            echo -n "$base"."$ext "
+       if test -z "$include"; then continue; fi
+        base="${include}/${module}"
+        if test  \( "$INTER" = "1" \) -a \( -f "$base".mli \) ; then
+           ## if we want to depend only on cmi of a module
+            /bin/echo -n  "${base}"."cmi "
+        elif test -f "$base".ml -o -f "$base".mly -o -f "$base".mll -o -f "$base".pack -o -f "$base".ml.str; then
+           ## else we depend on the implementation 
+            /bin/echo -n  "${base}"."${ext} "
             break
-        elif test -f "$base".mli; then
-            echo -n "$base"."cmi "
+        elif test -f "${base}".mli; then
+           ## and fall back on depending on the cmi if the cmx is not available
+           ## (which prevents cross-module inlining in the case of cmx)
+            /bin/echo -n  "${base}"."cmi "
             break
         fi
     done