Статическая информация о типах извлекается просто## Код:
```
MODULE M;

IMPORT
   Commands, Modules, Reflection;

PROCEDURE R*(context : Commands.Context);
VAR
   res: INTEGER;
   msg: ARRAY 32 OF CHAR;
BEGIN
   VAR mod := Modules.ThisModule("M", res, msg) : Modules.Module;
   IF res = Modules.Ok THEN
      Reflection.Report(context.out, mod.refs, 0);
   END
END R;

END M.R ~

System.Free M ~
```
