case_statement ::= "case" expression "is" case_statement_alternative { case_statement_alternative } "end" "case" ";"
This rule is called by -> compound_statement
-> compound_statement