(* Copyright (C) 1989, 1990 Digital Equipment Corporation	*)
(* All rights reserved.						*)
(* See the file COPYRIGHT for a full description.		*)

(* File: XtR.i3							*)
(* Last modified on Fri Apr 13 14:10:16 1990 by jerome		*)
(*      modified on Mon Feb 26 21:59:52 1990 by muller		*)


INTERFACE XtR;

(*==============================================================*)
(*	The X11 R4 Interface for Modula 3			*)
(*								*)
(*	Representation Types  corresponding to:			*)
(*			X11 R4 Intrinsic			*)
(*			X11 R4 Athena Widget Set		*)
(*==============================================================*)


FROM Ctypes IMPORT CharStar;

VAR
  AcceleratorTable               : CharStar;
  AsciiType                      : CharStar;
  Atom                           : CharStar;
  BackingStore                   : CharStar;
  Bitmap                         : CharStar;
  Bool                           : CharStar;
  Boolean                        : CharStar;
  CallProc                       : CharStar;
  Callback                       : CharStar;
  Cardinal                       : CharStar;
  Color                          : CharStar;
  Colormap                       : CharStar;
  Cursor                         : CharStar;
  Dimension                      : CharStar;
  Display                        : CharStar;
  EditMode                       : CharStar;
  Enum                           : CharStar;
  File                           : CharStar;
  Float                          : CharStar;
  Font                           : CharStar;
  FontStruct                     : CharStar;
  Function                       : CharStar;
  Geometry                       : CharStar;
  Immediate                      : CharStar;
  InitialState                   : CharStar;
  Int                            : CharStar;
  Justify                        : CharStar;
  Long                           : CharStar;
  LongBoolean                    : CharStar;
  Object                         : CharStar;
  Orientation                    : CharStar;
  Pixel                          : CharStar;
  Pixmap                         : CharStar;
  Pointer                        : CharStar;
  Position                       : CharStar;
  Screen                         : CharStar;
  ShapeStyle                     : CharStar;
  Short                          : CharStar;
  String                         : CharStar;
  StringArray                    : CharStar;
  StringTable                    : CharStar;
  TranslationTable               : CharStar;
  UnsignedChar                   : CharStar;
  Visual                         : CharStar;
  Widget                         : CharStar;
  WidgetClass                    : CharStar;
  WidgetList                     : CharStar;
  Window                         : CharStar;


PROCEDURE ForceToLoadAnImplementation ();

END XtR.