2002-04-26 05:16:26 -07:00
|
|
|
##ifdef CAMLTK
|
|
|
|
|
|
|
|
|
|
val contained : int -> int -> widget -> bool
|
|
|
|
|
(** [contained x y w] returns true if (x,y) is in w *)
|
|
|
|
|
|
|
|
|
|
##else
|
|
|
|
|
|
1999-11-30 06:59:39 -08:00
|
|
|
val contained : x:int -> y:int -> 'a widget -> bool
|
2002-04-26 05:16:26 -07:00
|
|
|
(** [contained x y w] returns true if (x,y) is in w *)
|
|
|
|
|
|
|
|
|
|
##endif
|
