[MLton-commit] r5324

[Matthew Fluet]

Eliminate unused identifier
----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/mlton/backend/packed-representation.fun

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

Modified: mlton/branches/on-20050822-x86_64-branch/mlton/backend/packed-representation.fun
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/mlton/backend/packed-representation.fun	2007-02-25 22:15:53 UTC (rev 5323)
+++ mlton/branches/on-20050822-x86_64-branch/mlton/backend/packed-representation.fun	2007-02-26 00:53:35 UTC (rev 5324)
@@ -492,7 +492,6 @@
                      NONE =>
                         let
                            val seqIndexSize = WordSize.seqIndex ()
-                           val seqIndexTy = Type.word (WordSize.bits seqIndexSize)
                            val csizeSize = WordSize.csize ()
                            val csizeTy = Type.word (WordSize.bits csizeSize)
                            (* vector + (eltWidth * index) + offset *)