Add test case for issue #6484

This commit is contained in:
Harold Brenes
2026-03-26 20:10:24 -04:00
parent e11bbdaa37
commit 7da7bc8456
3 changed files with 20 additions and 0 deletions

View File

@@ -35,6 +35,7 @@ set COMMON=-define:ODIN_TEST_FANCY=false -file -vet -strict-style -ignore-unused
..\..\..\odin test ..\test_pr_6470.odin %COMMON% || exit /b
..\..\..\odin test ..\test_pr_6470.odin -define:TEST_EXPECT_FAILURE=true %COMMON% 2>&1 | find /c "Error:" | findstr /x "1" || exit /b
..\..\..\odin test ..\test_pr_6476.odin %COMMON% || exit /b
..\..\..\odin check ..\test_issue_6484.odin -no-entry-point %COMMON% || exit /b
@echo off

View File

@@ -58,6 +58,8 @@ else
echo "SUCCESSFUL 0/1"
exit 1
fi
$ODIN check ../test_issue_6484.odin -no-entry-point $COMMON
set +x
popd

View File

@@ -0,0 +1,17 @@
// Tests issue #6484 https://github.com/odin-lang/Odin/pull/6484
package test_issues
foreign import lib "this_library_does_not_exist"
foreign lib {
foo :: proc(int) ---
when true {}
when true {}
bar :: proc() ---
}
foo_bar :: proc {
foo,
bar,
}