https://gcc.gnu.org/bugzilla/show_bug.cgi?id=122407
--- Comment #3 from Gaius Mulley <gaius at gcc dot gnu.org> ---
$ gm2 badtype.mod
badtype.mod:8:14: error: In program module ‘badtype’: SYSTEM procedure function
TSIZE expects a variable or type as its first parameter, seen unknown, did you
mean foo?
8 | IF TSIZE (Foo) = 1
| ^~~
