// Apple's Currency Converter example in Objective Modula-2
//
// ConverterController.def -- Converter controller interface
//
// http:/objective.modula2.net/samples/ConverterController.def

DEFINITION MODULE ConverterController;

FROM Cocoa IMPORT *; <*FRAMEWORK*>

TYPE
    ConverterController = CLASS ( NSObject )
    
        (* instance variable connecting to amount text field *)
        
        amountField : NSTextField; <*IBOutlet*>
    
        (* instance variable connecting to dollar text field *)
        
        dollarField : NSTextField; <*IBOutlet*>
    
        (* instance variable connecting to rate text field *)

        rateField : NSTextField; <*IBOutlet*>
    
    END; (* CLASS *)


(* instance method to read input, convert and write result back *)

METHOD (self : ConverterController) convert: (sender : OBJECT); <*IBAction*>

END ConverterController.