|
123456789101112 |
- module CPathChangeEvents
- ! use CIntegerArrayEventHandlerCollection
- ! use CVoidEventHandlerCollection
- implicit none
- public
-
- ! type(VoidEventHandlerCollection) :: BeforeTraverse
- ! type(VoidEventHandlerCollection) :: AfterTraverse
- ! type(IntegerArrayEventHandlerCollection) :: OnPathOpen
-
- contains
- end module CPathChangeEvents
|