mirror of
https://github.com/roc-lang/roc.git
synced 2025-07-24 06:55:15 +00:00
12 lines
305 B
Text
12 lines
305 B
Text
procedure Bool.2 ():
|
|
let Bool.23 : Int1 = true;
|
|
ret Bool.23;
|
|
|
|
procedure Test.0 ():
|
|
let Test.6 : Int1 = CallByName Bool.2;
|
|
if Test.6 then
|
|
let Test.8 : Str = "voided tag constructor is unreachable";
|
|
Crash Test.8
|
|
else
|
|
let Test.5 : Str = "abc";
|
|
ret Test.5;
|