Подскажите, пожалуйста, как обменяться указателями без создания временной переменной?

Сейчас приходится делать так
## Код:
```
a, b, swicher: POINTER TO ARRAY OF ARRAY OF REAL;

swicher := a;
a := b;
b := swicher;
```


Согласитесь уродство?