Clean2AppleEventHandler.dcl 310 Bytes
Newer Older
John van Groningen's avatar
John van Groningen committed
1
2
3
4
5
6
7
8
9
10
definition module Clean2AppleEventHandler;

from StdString import String;
from StdFile import Files;
from events import Event;

install_apple_event_handlers :: Int;
HandleAppleEvent :: !Event (!{#Char} *Files -> (!Int,!*Files)) !*Files -> (!Bool,!Bool,!*Files);

get_apple_event_string :: !Int !String -> Int;