[MLton-commit] r6993

[Ville Laurikari]

For backwards compatibility with old MLton versions, treat "-linkage
static" as an alias to "-linkage archive".

----------------------------------------------------------------------

U   mlton/trunk/mlnlffigen/main.sml

----------------------------------------------------------------------

Modified: mlton/trunk/mlnlffigen/main.sml
===================================================================
--- mlton/trunk/mlnlffigen/main.sml	2008-11-21 13:23:21 UTC (rev 6992)
+++ mlton/trunk/mlnlffigen/main.sml	2008-11-25 11:10:37 UTC (rev 6993)
@@ -52,7 +52,7 @@
         (Normal, "linkage", " {archive|dynamic|shared}",
          "how to link C objects",
          SpaceString (fn s =>
-                      if s = "archive"
+                      if s = "archive" orelse s = "static"
                          then linkage := Linkage.Archive
                       else if s = "dynamic"
                          then linkage := Linkage.Dynamic