{ GPC demo program. For copying conditions see the file `COPYING.DEMO'. } program CallCUDemo; uses CallCUnit; begin MyFoo := 42; Bar end.