Skip to content

Commit 1791218

Browse files
committed
integrate visualfsharp master (8)
1 parent 154e71a commit 1791218

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/fsharp/tast.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -40,7 +40,7 @@ type Stamp = int64
4040

4141
/// Unique name generator for stamps attached to to val_specs, tycon_specs etc.
4242
//++GLOBAL MUTABLE STATE
43-
let newStamp = let mutable i = 0L in fun () -> System.Threading.Interlocked.Increment(&i)
43+
let newStamp = let i = ref 0L in fun () -> System.Threading.Interlocked.Increment(i)
4444

4545
/// A global generator of compiler generated names
4646
// ++GLOBAL MUTABLE STATE

0 commit comments

Comments
 (0)