From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,XPRIO autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,242b945afa8fc264,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-12-02 08:05:02 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!news.tele.dk!small.news.tele.dk!newsfeed.arcor-online.net!uucp.gnuu.de!newsfeed.stueberl.de!newsr1.ipcore.viaginterkom.de!btnet-peer1!btnet-feed3!btnet!itchen!clyde!not-for-mail
From: "John F. Haddon" <jf_haddon@QinetiQ.com>
Newsgroups: comp.lang.ada
Subject: GNAT 3.15 - missing DLL after linking with OpenGL
Date: Mon, 2 Dec 2002 16:01:19 -0000
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2720.3000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <3deb8264$0$22276$9b0f33e3@clyde>
NNTP-Posting-Host: 10.176.81.224
X-Trace: 1038844516 clyde 22276 10.176.81.224
Xref: archiver1.google.com comp.lang.ada:31347
Date: 2002-12-02T16:01:19+00:00
List-Id: <comp.lang.ada>

Dear All,

I've just installed GNAT 3.15p and GNATWIN 3.15p on a Windows NT (and a
Windows 98) system and have tried to link with GLUT. Under Windows NT I get
the error message "The dynamic link library ll.dll could no be found in the
specified path". Under Windows 98, the error message is "Error starting
program, a required .DLL file, LL.DLL was not found". The path is OK and I'
ve done a search for the dll across the whole of both systems, both before
and after installation. It does not exist. The compile/link command
generates a valid executable under GNAT 3.14 that performs normally. The
program was ada_speres.adb, part of the standard distribution for GLUT3.7.6
To simplify the problem, I've reduced the program to a minimum and get the
same error.:

----------------------------------------------------------
with glut;
with Interfaces.C.Strings;

procedure test is
      Result  : Integer;
      C_Title : Interfaces.C.Strings.Chars_Ptr:=
Interfaces.C.Strings.New_String ("FRED");
begin
   Result := glut.Glutcreatewindow (C_Title);
   Interfaces.C.Strings.Free (C_Title);
end test;
-----------------------------------------------------------

Any help would be appreciated as I use Opengl in almost all my programs!

John

John Haddon, QinetiQ, Hants. GU14 0LX