]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/scl/GlobalVariables.scl
Code Review / simantics / platform.git / blob
? search:
summary | shortlog | log | commit | commitdiff | review | tree
history | raw | HEAD
Fixed multiple issues causing dangling references to discarded queries
[simantics/platform.git] / tests / scl / GlobalVariables.scl
1 import "Prelude"
2
3 global :: Ref Integer
4 global = ref 0
5
6 inc :: <Proc> ()
7 inc = global := getRef global + 1
8
9 main = do
10     inc
11     inc
12     getRef global
13 --
14 2
Simantics Platform SDK.