[Ada] Fix assertion failure on record subtype with -gnatRj