From 59f21d855811ebee5531c2ae1d2698edef08d277 Mon Sep 17 00:00:00 2001
From: Unknown <aleks@aleks-vostro>
Date: Mon, 25 Jul 2011 23:20:18 -0700
Subject:  - restored the "old" (as it was before switching from map to list)  
  ordering of field assignments

---
 Jennisys/Jennisys/Resolver.fs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'Jennisys')

diff --git a/Jennisys/Jennisys/Resolver.fs b/Jennisys/Jennisys/Resolver.fs
index c4bd99a2..d863cc7b 100644
--- a/Jennisys/Jennisys/Resolver.fs
+++ b/Jennisys/Jennisys/Resolver.fs
@@ -125,7 +125,6 @@ let ResolveModel hModel =
                                         let value = TryResolve hModel l |> Const2Expr
                                         Utils.ListMapAdd ({name = objName; objType = objType}, f) value acc 
                                      ) []
-                         |> List.rev
   let argmap = hModel.env |> Map.fold (fun acc k v -> 
                                          match k with
                                          | VarConst(name) -> acc |> Map.add name (Resolve hModel v)
-- 
cgit v1.2.3