При попытке оформить сишный код## Код:
```
void * cairo_get_user_data (cairo_t *cr, const cairo_user_data_key_t *key);
```

таким образом## Код:
```
PROCEDURE [ccall] cairo_get_user_data* (cr: Pcairo_t; key: Pcairo_user_data_key_t): POINTER;
```
я получил от компилятора сообщение, что не хватает TO (<тип>).

Я переписал его следующим образом:## Код:
```
TYPE
   Ptr* =  POINTER TO RECORD [untagged] END;
PROCEDURE [ccall] cairo_get_user_data* (cr: Pcairo_t; key: Pcairo_user_data_key_t): Ptr;
```


Правильно ли это?