Подскажите, пожалуйста, что здесь не так:

## Код:
```
PROCEDURE (m: StdModel) SetFont ( size: INTEGER; name: ARRAY 124 OF SHORTCHAR );
```


ошибка при компиляции: parametr does not match.
Если и здесь, и в исходном типе убрать параметр
name: ARRAY 124 OF SHORTCHAR

то компилируется без ошибок.