add test for fsharp/fsharp#483 (2)

Author: dsyme

tests/fsharp/core/attributes/test.fsx

@@ -1342,6 +1342,20 @@ module ParamArrayNullAttribute =
     check "vwcewecioj9" (test3()) "Attr(<null>)"
 
 
+// See https://github.com/fsharp/fsharp/issues/483
+// We do not expect an exception
+module TestFsiLoadOfNonExistentAssembly = 
+    let test() = 
+      try 
+        let log4netType = System.Type.GetType("ThisTypeDoes.Not.Exist, thisAssemblyDoesNotExist")
+        let exists = log4netType <> null
+        if exists then report_failure (sprintf "type existed!")
+        do printfn "%A" exists
+       with e -> 
+         report_failure (sprintf "exception unexpected: %s" e.Message)
+
+    do test()
+
 
 (*-------------------------------------------------------------------------
 !* Test passed?

tests/fsharp/core/fsiAndModifiers/test.fsx

@@ -86,19 +86,6 @@ module TestPack4 =
     printfn "got %A" got
     if got <> expected then fail (sprintf "TestPack4: got %A, expected %A" got expected)
 
-// See https://github.com/fsharp/fsharp/issues/483
-module TestFsiLoadOfNonExistentAssembly = 
-    let test() = 
-      try 
-        let log4netType = System.Type.GetType("ThisTypeDoes.Not.Exist, thisAssemblyDoesNotExist")
-        let exists = log4netType <> null
-        if exists then fail (sprintf "type existed!")
-        do printfn "%A" exists
-       with e -> 
-         fail (sprintf "exception unexpected: %s" e.Message)
-
-    do test()
-
 if errors.IsEmpty then 
     System.IO.File.WriteAllText("test.ok", "")
 else