Programming X Windows...

Programming X Windows...

[Andy Freeborough]

Hi,
   Does anybody know of any good, easy to use, 
freeware programs that will allow me to create X 
Windows applications using ADA or C++? I presume 
you can do it anyway using some sort of calls, 
like API calls in MS Windows, but I am finding it 
hard to find any information. I would be greatful 
of any help,

Yours

Andy. (cmsafree@livjm.ac.uk)

Re: Programming X Windows...

[David C. Hoos, Sr.]

Hi Andy,
The Web page "http://www.inmet.com/~mg/x11ada/x11ada.html" has bindings of
X11 to Ada95 which I have successfully used with gnat3.05, the free Ada95
compiler.
The compiler is available for many platforms from the FTP site directory
"ftp.cs.nyu.edu/pub/gnat".
I also requested the Motif bindings to be e-mailed to me as described on
the X11 page mentioned above.
I have had absolutely no problems with these bindings running gnat3.05 on
SGI IRIX5.3 and IRIX6.2 platforms ranging from R3000 to R10000 processors.
Enjoy!
-- 
David C. Hoos, Sr.,
http://www.dbhwww.com
http://www.ada95.com

Andy Freeborough <cmsafree@livjm.ac.uk> wrote in article
<322CB55C.AB@livjm.ac.uk>...
> Hi,
>    Does anybody know of any good, easy to use, 
> freeware programs that will allow me to create X 
> Windows applications using ADA or C++? I presume 
> you can do it anyway using some sort of calls, 
> like API calls in MS Windows, but I am finding it 
> hard to find any information. I would be greatful 
> of any help,
> 
> Yours
> 
> Andy. (cmsafree@livjm.ac.uk)
> 

Re: Programming X Windows...

[G. Vincent Castellano]

% Hi,
%    Does anybody know of any good, easy to use,
% freeware programs that will allow me to create X
% Windows applications using ADA or C++? I presume
% you can do it anyway using some sort of calls,
% like API calls in MS Windows, but I am finding it
% hard to find any information. I would be greatful
% of any help,
% 

Aforms is an Ada 95 binding to the XForms toolkit, an
X-based GUI Builder and API.  Aforms now includes an
'adapter' utility which translates the output of the GUI
builder from C to Ada 95.  Xforms is free for
non-commercial use.  Download Aforms from

   http://ocsystems.com/xada/xforms1.html

 -----------------------------------------------------------------------
 -    G. Vincent Castellano, Sr. Software Engineer, OC Systems Inc     -
 -   gvc@ocsystems.com :: X/Ada WWW => http://www.ocsystems.com/xada   -
 -----------------------------------------------------------------------
 - "If virtual memory did not exist, it would                          -
 -   have become necessary for us to invent it."                       -
 -----------------------------------------------------------------------

Re: Programming X Windows...

[Jim Dorman]

If you want to write X-Windows applications on Unix based PCs, you might
want to take a look at XAda.  This is the only PC Ada compiler used during
the Ada9x project and was the Ada compiler chosen by the USAF on the
DESKTOP III & IV contracts. Information on XAda is available at: 
"http://www.pcada.com.

-- 
Jim Dorman
Active Engineering Technologies, Inc.
Home of PC ADA
Voice:  (619) 414-9001
Fax:     (619) 414-9192
email:  jimd@pcada.com
URL:  http://www.pcada.com
Member of Team Ada!

G. Vincent Castellano <gvc@ocsystems.com> wrote in article
<1996Sep11.202712.15729@ocsystems.com>...
> % Hi,
> %    Does anybody know of any good, easy to use,
> % freeware programs that will allow me to create X
> % Windows applications using ADA or C++? I presume
> % you can do it anyway using some sort of calls,
> % like API calls in MS Windows, but I am finding it
> % hard to find any information. I would be greatful
> % of any help,
> % 
> 
> Aforms is an Ada 95 binding to the XForms toolkit, an
> X-based GUI Builder and API.  Aforms now includes an
> 'adapter' utility which translates the output of the GUI
> builder from C to Ada 95.  Xforms is free for
> non-commercial use.  Download Aforms from
> 
>    http://ocsystems.com/xada/xforms1.html
> 
>  -----------------------------------------------------------------------
>  -    G. Vincent Castellano, Sr. Software Engineer, OC Systems Inc     -
>  -   gvc@ocsystems.com :: X/Ada WWW => http://www.ocsystems.com/xada   -
>  -----------------------------------------------------------------------
>  - "If virtual memory did not exist, it would                          -
>  -   have become necessary for us to invent it."                       -
>  -----------------------------------------------------------------------
> 
> 

Re: Programming X Windows...

[G. Vincent Castellano]

% 
% I have never seen a thin Ada binding I liked, although I will admit
% to not having seen bindings from many sources.  The ones I have seen
% seem to be done "on the cheap" with no attempt to use derived numeric
% types to separate the "number of apples" cells from the "number of
% oranges" cells.
% 

First, with Ada 95's general access types, modular types
and access to subprograms, it is much easier to create thin
bindings whose typing corresponds reasonably closely to the
original interface.  Have you looked at any Ada 95 bindings?

Second, the determination of how and where to define derived
types is often impossible to determine from the 'original
text' of the interface you're binding to.  If the interface
was not originally designed with the subtype/derived type
issue in mind, it's pretty tough to graft one on as an 
afterthought.
 -----------------------------------------------------------------------
 -    G. Vincent Castellano, Sr. Software Engineer, OC Systems Inc     -
 -   gvc@ocsystems.com :: X/Ada WWW => http://www.ocsystems.com/xada   -
 -----------------------------------------------------------------------
 - "If virtual memory did not exist, it would                          -
 -   have become necessary for us to invent it."                       -
 -----------------------------------------------------------------------

Quality of Thin Bindings (was: Programming X Windows...)

[Larry Kilgallen]

In article <1996Oct22.171704.25522@ocsystems.com>, gvc@ocsystems.com (G. Vincent Castellano) quotes me and then writes:
> % 
> % I have never seen a thin Ada binding I liked, although I will admit
> % to not having seen bindings from many sources.  The ones I have seen
> % seem to be done "on the cheap" with no attempt to use derived numeric
> % types to separate the "number of apples" cells from the "number of
> % oranges" cells.
> % 
> 
> First, with Ada 95's general access types, modular types
> and access to subprograms, it is much easier to create thin
> bindings whose typing corresponds reasonably closely to the
> original interface.  Have you looked at any Ada 95 bindings?

I have looked at the Win32 bindings which come with ObjectAda 7.0
and it seems to me they rely excessively on a single integer type.
I gather that the same bindings are used by others, which is why
I did not raise this as a private matter with the ObjectAda vendor.
Portability between compiler vendors is important (and lack of it
causes a problem for Pascal on Macintosh).  Quality of those bindings
is also important.

> Second, the determination of how and where to define derived
> types is often impossible to determine from the 'original
> text' of the interface you're binding to.  If the interface
> was not originally designed with the subtype/derived type
> issue in mind, it's pretty tough to graft one on as an 
> afterthought.

Certainly just the text is not sufficient -- detailed knowledge of the
software involved is essential.  The set of bindings for which I am
most qualified to comment is Starlet, where there are many Ada 83
opportunities for derived numeric types which are not taken.  The
subtype:

   subtype CHANNEL_TYPE is SYSTEM.UNSIGNED_WORD;

for example, can never be used for any (valid) purpose besides
calling system services which take a value of that type.

I don't know what ACT might be doing to strengthen Starlet, but in
this particular case, and many others like it, I don't see anything
specific to Ada 95 that should not have been done for Ada 83 Starlet
as well.

There is a very similar 16 bit quantity in Starlet called a
Mailbox Unit, typically described as:

        MBXUNT          : in  UNSIGNED_WORD             := 0;

and it is easy to confuse the two.  I have confused the two twice
in my life (at least), separated by 15 years.  Neither was in Ada,
but inadequate bindings mean Ada would not have caught my error
either.  The nature of the failure mode does not lead to easy
analysis.

So I look at Win32 bindings and see the same casual approach we have
had in Starlet for years.  I realize such bindings work is not a big
moneymaker for anyone (especially since the goal is to share results),
but I am concerned about the issue of using the language to sort out
problems in everyday programming, not just space projects.

Larry Kilgallen

Re: Quality of Thin Bindings (was: Programming X Windows...)

[Mitch Gart]

Larry Kilgallen (kilgallen@eisner.decus.org) wrote:

: I have looked at the Win32 bindings which come with ObjectAda 7.0
: and it seems to me they rely excessively on a single integer type.

The problem is that Win32Ada doesn't represent an independent design 
of an API, it is a translation of a Microsoft API into Ada.  If 
Microsoft uses universal integer types everywhere, so must the binding.

Consider a simple example:

#define MASK1 1
#define MASK2 2
#define MASK3 4

In Ada is this a series of integer constants or an enumeration?  It's
tempting to say it should be an enumeration but then what about functions
in the binding that take integer parameters and return integer results?
Some of those functions may in fact take mask values or return mask results
from this enumeration, but how can the person writing the binding be sure
of the intentions of the original authors of the C software?  This kind of
question is one reason why Win32Ada is at such a direct one-for-one level
with the original C software.  

I and others have said many times that it would be good to think of a binding
like Win32Ada as a low level layer upon which other higher level layers could
be built.  I would encourage people to use Win32Ada as a base level and build
higher level Ada bindings to specific small parts of the Win32 API, for example
MAPI or OLE or ODBC or Video For Windows.

(snip)
: I don't know what ACT might be doing to strengthen Starlet
(snip)

I'm guessing that the people who invented Starlet had two advantages:

- VMS and Starlet were both Digital products so presumably the people working
  on Starlet were able to easily talk to the VMS people 

- DEC was at one time funding Starlet development and saw Ada as a money-making
  business area.

Mitch Gart