From mboxrd@z Thu Jan  1 00:00:00 1970
Received: (from majordomo@localhost) by pauillac.inria.fr (8.7.6/8.7.3) id LAA01570; Tue, 8 Jan 2002 11:10:56 +0100 (MET)
Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id LAA01266 for <caml-list@pauillac.inria.fr>; Tue, 8 Jan 2002 11:10:55 +0100 (MET)
Received: from war.OCF.Berkeley.EDU (war.OCF.Berkeley.EDU [128.32.191.89])
	by concorde.inria.fr (8.11.1/8.11.1) with ESMTP id g08AAsr04982
	for <caml-list@inria.fr>; Tue, 8 Jan 2002 11:10:54 +0100 (MET)
Received: from conquest.OCF.Berkeley.EDU (daemon@conquest.OCF.Berkeley.EDU [128.32.191.90])
	by war.OCF.Berkeley.EDU (8.11.6/8.9.3) with ESMTP id g08AArp24106
	for <caml-list@inria.fr>; Tue, 8 Jan 2002 02:10:53 -0800 (PST)
Received: from localhost (wrader@localhost)
	by conquest.OCF.Berkeley.EDU (8.11.6/8.10.2) with ESMTP id g08AArw10778
	for <caml-list@inria.fr>; Tue, 8 Jan 2002 02:10:53 -0800 (PST)
X-Authentication-Warning: conquest.OCF.Berkeley.EDU: wrader owned process doing -bs
Date: Tue, 8 Jan 2002 02:10:52 -0800 (PST)
From: "Walter B. Rader" <wrader@OCF.Berkeley.EDU>
To: caml-list@inria.fr
Subject: [Caml-list] "abbreviation of class expands to type.., but is used with type.."
Message-ID: <Pine.SOL.4.43.0201080207270.10751-100000@conquest.OCF.Berkeley.EDU>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-caml-list@pauillac.inria.fr
Precedence: bulk


I'm getting a vague error message when trying to compile my project in
OCaml.  The summary of the error message is in the subject of the message,
again summarized here:

"The abbreviation widgetBase expands to type ...
 but is used with type..."

(Full text appears below.)  The error apparenty appears on line 140, which
is the start of the definition of the class.  Therefore, I have no idea
where I'm using the class incorrectly.

Any suggestions?

Thanks,

Walter Rader



 /usr/bin/ocamlopt -c -unsafe -inline 10  -I ../lib
gui-test.ml File "gui-test.ml", line 140, characters 10-19041:
The abbreviation widgetBase expands to type
< add_widget : widgetBase -> int -> int -> bool -> int -> unit;
  clearOutline : Sdlvideo.surface -> Sdlvideo.surface -> widgetInfo -> unit;
  clippedDirection : int -> int -> int -> int;
  clippedHeight : widgetInfo -> int; clippedWidth : widgetInfo -> int;
  createSurface : unit -> unit; decorateBackground : unit -> unit;
  decorateForeground : unit -> unit;
  doToValidWidgets : widgetInfo list -> (widgetInfo -> unit) -> unit;
  drawOutline : widgetInfo -> unit; get_height : int;
  get_surface : Sdlvideo.surface; get_width : int;
  handleEvent : Sdlevents.event -> unit; isMovable : 'a;
  redrawBackgroundUnderWidget : widgetInfo -> unit;
  redrawBackgroundsUnderWidgets : widgetInfo list -> unit;
  redrawWidget : widgetInfo -> unit; redrawWidgets : widgetInfo list -> unit;
  updateOutlineRect : Sdlvideo.surface -> widgetInfo -> unit;
  updateWidgetRect : widgetInfo -> unit;
  updateWidgetRects : widgetInfo list -> unit;
  whichWidgetWasClicked : int * int -> widgetInfo option;
  widgetWasMoved : widgetInfo -> unit >
but is used with type
< add_widget : widgetBase -> int -> int -> bool -> int -> unit;
  clearOutline : Sdlvideo.surface -> Sdlvideo.surface -> widgetInfo -> unit;
  clippedDirection : int -> int -> int -> int;
  clippedHeight : widgetInfo -> int; clippedWidth : widgetInfo -> int;
  createSurface : unit -> unit; decorateBackground : unit -> unit;
  decorateForeground : unit -> unit;
  doToValidWidgets : widgetInfo list -> (widgetInfo -> unit) -> unit;
  drawOutline : widgetInfo -> unit; get_height : int;
  get_surface : Sdlvideo.surface; get_width : int;
  handleEvent : Sdlevents.event -> unit; isMovable : bool;
  is_rootWidget : bool; redrawBackgroundUnderWidget : widgetInfo -> unit;
  redrawBackgroundsUnderWidgets : widgetInfo list -> unit;
  redrawWidget : widgetInfo -> unit; redrawWidgets : widgetInfo list -> unit;
  updateOutlineRect : Sdlvideo.surface -> widgetInfo -> unit;
  updateWidgetRect : widgetInfo -> unit;
  updateWidgetRects : widgetInfo list -> unit;
  whichWidgetWasClicked : int * int -> widgetInfo option;
  widgetWasMoved : widgetInfo -> unit; .. >
make: *** [gui-test.cmx] Error 2

-------------------
Bug reports: http://caml.inria.fr/bin/caml-bugs  FAQ: http://caml.inria.fr/FAQ/
To unsubscribe, mail caml-list-request@inria.fr  Archives: http://caml.inria.fr