Error when publishing a case with type Joker

Please include the following with each issue:

1. Describe the bug When creating a switch case on a value of the type joker, the compiler will not throw an error, but publishing the App will.

2. To Reproduce Steps to reproduce the behavior:

Create a case on a value of Type Joker

procedure Example()
    var
        RecordRef: RecordRef;
        newFieldRef: FieldRef;
    begin

        RecordRef.Close();
        RecordRef.Open(77);
        if RecordRef.FindFirst() then begin
            newFieldRef := RecordRef.Field(3);
            case newFieldRef.Value of
                1:
                    Message('Hello');
            end;
        end;

    end;

Publish

3. Expected behavior Either the compiler throws an error immediatly, or i can successfully publish.

4. Actual behavior The compiler throws neither Error nor Warning, but on publish i get:

The request for path /BC/dev/apps?tenant=default&SchemaUpdateMode=synchronize&DependencyPublishingOption=default failed with code UnprocessableEntity. Reason: Failure while emitting method. Object:'Codeunit Example' Method:'Example()' (Unexpected value 'Joker' of type 'Microsoft.Dynamics.Nav.CodeAnalysis.NavTypeKind')
Unexpected value 'Joker' of type 'Microsoft.Dynamics.Nav.CodeAnalysis.NavTypeKind'

5. Versions:

AL Language: 13.1.1065068
Visual Studio Code: 1.92.2
Business Central: DE Business Central 24.4 (Plattform 24.0.23374.0 + Anwendung 24.4.22295.23403)
List of Visual Studio Code extensions that you have installed:AL Language

Final Checklist

Please remember to do the following:

[ X] Search the issue repository to ensure you are reporting a new issue
[ X] Reproduce the issue after disabling all extensions except the AL Language extension
[ X] Simplify your code around the issue to better isolate the problem

Internal work item: AB#546897

microsoft / AL

Error when publishing a case with type Joker #7832

Final Checklist