\insert 'NewPortObjects.oz' declare AddPortObject Call {NewPortObjects AddPortObject Call} {AddPortObject mine proc {$ Msg} {Browse got(Msg)} end} {Call mine aMsg(3)}