tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/DeconstructEnum.scl

   1 import "Prelude"
   2
   3 importJava "java.nio.file.StandardOpenOption" where
   4     data OpenOption
   5
   6     READ :: OpenOption
   7     WRITE :: OpenOption
   8
   9 idOf READ = 3
  10 idOf WRITE = 19
  11
  12 main = idOf READ + idOf WRITE + idOf READ
  13 --
  14 25