Update of /cvsroot/hoc/hoc/Samples/Editor
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14320/Samples/Editor
Modified Files:
HaskellDocument.hs
Removed Files:
Selectors.hs
Log Message:
Use a (Template Haskell) Name rather than the selector info as a parameter
for InstanceMethod, i.e. instead of
$(exportClass ... [
InstanceMethod info_foo
])
we now write
$(exportClass ... [
InstanceMethod 'foo
])
Most importantly, it is no longer necessary to declare the selectors used
in exportClass in a separate file.
Index: HaskellDocument.hs
===================================================================
RCS file: /cvsroot/hoc/hoc/Samples/Editor/HaskellDocument.hs,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- HaskellDocument.hs 31 Mar 2005 16:37:58 -0000 1.2
+++ HaskellDocument.hs 20 Mar 2006 06:25:26 -0000 1.3
@@ -13,10 +13,10 @@
Outlet "textView" [t| NSTextView () |],
InstanceVariable "text" [t| Maybe (NSString ()) |] [| Nothing |],
- InstanceMethod info_windowNibName,
- InstanceMethod info_writeToFileOfType,
- InstanceMethod info_readFromFileOfType,
- InstanceMethod info_windowControllerDidLoadNib
+ InstanceMethod 'windowNibName,
+ InstanceMethod 'writeToFileOfType,
+ InstanceMethod 'readFromFileOfType,
+ InstanceMethod 'windowControllerDidLoadNib
])
hd_windowNibName self =
--- Selectors.hs DELETED ---
|
