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

   1 module {
   2     features = [edo]
   3 }
   4
   5 import "StandardLibrary"
   6
   7 example :: () -> Maybe Integer
   8 example _ = edo
   9     str <- Just "a"
  10     let print str in Nothing
  11
  12 main = example ()
  13 --
  14 10:9-10:18: Side-effect Proc is forbidden here.