Skip to content

Commit 61b0ebd

Browse files
committed
add test files
1 parent bdb8427 commit 61b0ebd

File tree

3 files changed

+42
-0
lines changed

3 files changed

+42
-0
lines changed
Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
2+
// Repro for https://github.com/Microsoft/visualfsharp/issues/1298
3+
namespace Ploeh.Weird.Repro
4+
5+
type Foo = {
6+
Value : string
7+
Text : string }
8+
9+
type Bar = {
10+
Value : string
11+
Number : int }
12+
13+
type Baz = {
14+
Value : int
15+
Text : string }
Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,4 @@
1+
namespace Ploeh.Weird.Repro
2+
3+
4+
// deliberately empty
Lines changed: 23 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,23 @@
1+
// #Conformance #Regression
2+
#if Portable
3+
module Core_fileorder
4+
#endif
5+
6+
7+
open Ploeh.Weird.Repro
8+
9+
let failures = ref false
10+
let report_failure s =
11+
stderr.WriteLine ("NO: test "+s+" failed"); failures := true
12+
13+
14+
let b = {
15+
Value = 42
16+
Text = "Ploeh" }
17+
18+
let aa =
19+
if !failures then (stdout.WriteLine "Test Failed"; exit 1)
20+
21+
do (stdout.WriteLine "Test Passed";
22+
System.IO.File.WriteAllText("test.ok","ok");
23+
exit 0)

0 commit comments

Comments
 (0)