JosephFerano/flan
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

An Option plus a literal is refused at the operator, the literal having been wrapped.

Browse Source
This commit is contained in:
Joseph Ferano 2026-09-26 17:16:16 +07:00
parent cb60df1dc0
commit 09f1e4369f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/test_syntax.ml
View File

@ -1473,7 +1473,7 @@ let () =
refused "addr-taken.fln" refused "addr-taken.fln"
"fn clear(p: Ptr(i32?))\n deref(p) = None\n\nfn main()\n let x: i32? = Some(1)\n\ "fn clear(p: Ptr(i32?))\n deref(p) = None\n\nfn main()\n let x: i32? = Some(1)\n\
\ let p = addr(x)\n if x?\n clear(p)\n println(x + 1)\n" \ let p = addr(x)\n if x?\n clear(p)\n println(x + 1)\n"
[ "expected Option(i32)" ]; [ "+ takes numbers, found Option(i32)" ];
refused "capital-local.fln" "fn main()\n let X: i32? = Some(1)\n println(X?)\n" refused "capital-local.fln" "fn main()\n let X: i32? = Some(1)\n println(X?)\n"
[ "To test the local X, give it a lowercase name, as in x?" ]; [ "To test the local X, give it a lowercase name, as in x?" ];
checks "addr-taken-test.fln" checks "addr-taken-test.fln"