@@ -246,7 +246,7 @@ type ListType() =
246246 CheckThrowsIndexOutRangException(( fun _ -> lst.[ 7 ..] |> ignore))
247247
248248
249- Assert.AreEqual( lst.[..- 1 ], ([]: int list))
249+ Assert.AreEqual( lst.[..(- 1 ) ],([]: int list))
250250 Assert.AreEqual( lst.[.. 0 ], [ 1 ])
251251 Assert.AreEqual( lst.[.. 1 ], [ 1 ; 2 ])
252252 Assert.AreEqual( lst.[.. 2 ], [ 1 ; 2 ; 3 ])
@@ -255,7 +255,7 @@ type ListType() =
255255 Assert.AreEqual( lst.[.. 5 ], [ 1 ; 2 ; 3 ; 4 ; 5 ; 6 ])
256256 CheckThrowsIndexOutRangException(( fun _ -> lst.[.. 6 ] |> ignore))
257257
258- Assert.AreEqual( lst.[ 0 ..- 1 ], ([]: int list))
258+ Assert.AreEqual( lst.[ 0 ..(- 1 ) ],([]: int list))
259259 Assert.AreEqual( lst.[ 0 .. 0 ], [ 1 ])
260260 Assert.AreEqual( lst.[ 0 .. 1 ], [ 1 ; 2 ])
261261 Assert.AreEqual( lst.[ 0 .. 2 ], [ 1 ; 2 ; 3 ])
@@ -264,7 +264,7 @@ type ListType() =
264264 Assert.AreEqual( lst.[ 0 .. 5 ], [ 1 ; 2 ; 3 ; 4 ; 5 ; 6 ])
265265 CheckThrowsIndexOutRangException(( fun _ -> lst.[ 0 .. 6 ] |> ignore))
266266
267- Assert.AreEqual( lst.[ 1 ..- 1 ], ([]: int list))
267+ Assert.AreEqual( lst.[ 1 ..(- 1 ) ],([]: int list))
268268 Assert.AreEqual( lst.[ 1 .. 0 ], ([]: int list))
269269 Assert.AreEqual( lst.[ 1 .. 1 ], [ 2 ])
270270 Assert.AreEqual( lst.[ 1 .. 2 ], [ 2 ; 3 ])
@@ -280,8 +280,8 @@ type ListType() =
280280 Assert.AreEqual( lst.[ 3 .. 1 ], ([]: int list))
281281 Assert.AreEqual( lst.[ 4 .. 1 ], ([]: int list))
282282
283- Assert.AreEqual( lst.[- 3 ..- 4 ], ([]: int list))
284- CheckThrowsIndexOutRangException(( fun _ -> lst.[- 4 ..- 3 ] |> ignore))
283+ Assert.AreEqual( lst.[- 3 ..(- 4 ) ],([]: int list))
284+ CheckThrowsIndexOutRangException(( fun _ -> lst.[- 4 ..(- 3 ) ]|> ignore))
285285
286286let empty : obj list = List.empty
287287 Assert.AreEqual( empty.[*], ([]: obj list))