]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/While3.scl
List the unsatisfied dependencies in CanvasContext
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / While3.scl
1 import "Prelude"\r
2 \r
3 main = do\r
4     a = ref 1\r
5     b = ref 0\r
6     while (getRef a < 5) do\r
7         b := getRef b + 1\r
8         a := getRef a + 1\r
9     getRef b             \r
10 --\r
11 4