10 lines
194 B
Forth
10 lines
194 B
Forth
|
module ReferenceCells
|
||
|
|
|
||
|
|
// Declare a reference.
|
||
|
|
let refVar = ref 6
|
||
|
|
|
||
|
|
// Change the value referred to by the reference.
|
||
|
|
refVar := 50
|
||
|
|
|
||
|
|
// Dereference by using the ! operator.
|
||
|
|
printfn "%d" !refVar
|