diff --git a/VisualMIPS/i_type.fs b/VisualMIPS/i_type.fs index 48d6764..3925e37 100644 --- a/VisualMIPS/i_type.fs +++ b/VisualMIPS/i_type.fs @@ -99,7 +99,7 @@ module Itypes = let createAddress x = Memory( myBase + offsetSigned + x ) let loadContent x = uint32( T.getValue( getMem x mach )) let createWord x = List.fold (fun acc y -> (acc <<< 8) + y) 0u x - [0u; 1u; 2u; 3u] //[0u..3u] + [3u; 2u; 1u; 0u] //[0u..3u] |> List.map (createAddress >> loadContent) |> createWord let outputWord = Word( output ) @@ -189,4 +189,4 @@ module Itypes = returnMach - \ No newline at end of file +