diff options
| author | Camil Staps | 2015-08-21 15:34:02 +0200 |
|---|---|---|
| committer | Camil Staps | 2015-08-21 15:34:02 +0200 |
| commit | b12dd08cdf9c0ba3d7ff4c62a14658e059348197 (patch) | |
| tree | 8a83063b3d2a31c3e5889e6eea7ab24795d1a4df /oswindow.icl | |
| parent | Removing redundant import (diff) | |
Cleaning up
Diffstat (limited to 'oswindow.icl')
| -rw-r--r-- | oswindow.icl | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/oswindow.icl b/oswindow.icl index 54ac7ac..d1027d1 100644 --- a/oswindow.icl +++ b/oswindow.icl @@ -196,7 +196,6 @@ osGetSliderControlMinWidth _ = 0 /* Window creation functions.
*/
-import StdMisc
osCreateDialog :: !Bool !Bool !String !(!Int,!Int) !(!Int,!Int) !OSWindowPtr
!(u:s->*(OSWindowPtr,u:s))
!(OSWindowPtr->u:s->u:(*OSToolbox->*(u:s,*OSToolbox)))
@@ -568,7 +567,6 @@ osCreateSliderControl parentWindow parentPos show able horizontal (x,y) (w,h) (m instance toString (a,b) | toString a & toString b
where
toString (a,b) = "(" +++ toString a +++ "," +++ toString b +++")"
-from StdMisc import abort
osCreateTextControl :: !OSWindowPtr !(!Int,!Int) !String !Bool !(!Int,!Int) !(!Int,!Int) !*OSToolbox -> (!OSWindowPtr,!*OSToolbox)
osCreateTextControl parentWindow parentPos text show (x,y) (w,h) tb
//| True = abort ("osCreateTextControl\n" +++ toString parentWindow +++ "\n" +++
|