--- a/lib/scripts/run-polyml-4.9.1 Wed Sep 27 23:53:46 2006 +0200
+++ b/lib/scripts/run-polyml-4.9.1 Thu Sep 28 00:10:08 2006 +0200
@@ -61,7 +61,7 @@
if [ -z "$COMPRESS" ]; then
COMMIT="fun commit () = (PolyML.export (\"$OUTFILE\", PolyML.rootFunction); true);"
else
- COMMIT="fun commit () = (PolyML.export (\"$OUTFILE\", PolyML.shareCommonData PolyML.rootFunction); true);"
+ COMMIT="fun commit () = (PolyML.shareCommonData PolyML.rootFunction; PolyML.export (\"$OUTFILE\", PolyML.rootFunction); true);"
fi
[ -f "$OUTFILE" ] && { chmod +w "$OUTFILE" || fail_out; }
rm -f "${OUTFILE}.o" || fail_out