В сборке OberonCore есть фикс внутренней процедуры TextMappers.Get (видимо, не соответствовала спецификации модуля):

## Код:
```
PROCEDURE Get (VAR s: Scanner; OUT ch: CHAR);
   BEGIN
      s.rider.ReadChar(ch);
      IF ({returnViews, maskViews} * s.opts = {returnViews}) & (s.rider.view # NIL) THEN
         ch := VIEW; s.rider.char := VIEW
      END
   END Get;
```


В оригинале эта процедура выглядела:
## Код:
```
PROCEDURE Get (VAR s: Scanner; OUT ch: CHAR);
   BEGIN
      s.rider.ReadChar(ch);
   END Get;
```


Короче говоря, при этом исправлении перестаёт правильно работать автодополнение i21sys.
m F5 даёт MAX, а не конструкцию MODULE.
p F5 даёт POINTER, а не PROCEDURE...
и т. д.

Видимо, тот случай, когда старые ошибки уже стали не багом, а фичами - и исправление влияет на работоспособность уже существующего клиентского кода...