Merge commit 'ffdf837'

[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / InlineLoop.scl

data SList a = Nil | Cons a (SList a)

@inline
copy (Cons h t) = Cons h (copy t)
copy l = l

main = "OK"
--
OK