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 autolearn=unavailable autolearn_force=no version=3.4.4 Path: border1.nntp.dca3.giganews.com!backlog3.nntp.dca3.giganews.com!border3.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!nntp.giganews.com!news-in-01.newsfeed.easynews.com!easynews!core-easynews-01!easynews.com!en-nntp-15.dc1.easynews.com.POSTED!not-for-mail From: agent@drrob1.com Newsgroups: comp.lang.ada Subject: Re: texttools and standard library packages Message-ID: References: <83jfa95ibgj73rsr9r8d038plvrm6m4d8d@4ax.com> User-Agent: ForteAgent/7.20.32.1218 MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Complaints-To: abuse@easynews.com Organization: Forte Inc. http://www.forteinc.com/apn/ X-Complaints-Info: Please be sure to forward a copy of ALL headers otherwise we will be unable to process your complaint properly. Date: Thu, 12 Dec 2013 07:34:02 -0500 X-Received-Bytes: 3594 X-Original-Bytes: 3662 Xref: number.nntp.dca.giganews.com comp.lang.ada:184232 Date: 2013-12-12T07:34:02-05:00 List-Id: On Wed, 11 Dec 2013 14:48:38 +0200, Niklas Holsti wrote: >On 13-12-11 04:25 , agent@drrob1.com wrote: >> I am a total newbie in regards to Ada, but have been using stony brook >> modula2 for many years. >> >> I am trying to use the source texttools-2-1-0 and to compile the >> ttdemo program. I am getting an error saying that To255 is undefined. >> I cannot find where this is. >> >> Where do I look, or what library to I have to import (with,use)? > >After downloading texttools-2-1-0 (from >http://www.pegasoft.ca/downloads/), it seems that all occurrences of >"To255" are in comments, and there is no "ttdemo" example. This suggests >to me that "To255" was a feature of an earlier version of texttools, and >that "ttdemo" has not been updated to work with version 2.1.0. The >README file says this: > >-- quote from texttools-2-1-0 README: >Version 2.1.0 has a new ... conversion from bounded strings to unbounded >strings. The gen_list generic linked list package has been >deprecated in favour of the standard Ada list packages introduced in Ada >2005. > >TIA 1.2.2 will not build with Texttools 2.1.0 due to these changes. >-- end quote > >You could try some of the other example programs included in the >texttools-2-1-0 installation kit. Presumably, these should work with >this version of texttools; at least they do not use "To255". > >I don't know if this is the same "ttdemo" program that you are using, >but there is a "ttdemo" at >http://beru.univ-brest.fr/~singhoff/DOC/LANG/ADA/BOOK/15.html, in which >To255 occurs for the first time in this statement: > > OpenWindow( To255( "Demo Window" ), -- title at top of window > 0, 0, 78, 23, -- the coordinates of the window > Style => normal, -- type of window, usually "normal" > HasInfoBar => true ); -- true if control information is > >Looking at the declaration of OpenWindow in package Windows >(windows.ads), the first parameter should now be an ordinary String: > > procedure OpenWindow( title : in String ; l, t, r, b : integer; > Style : AWindowStyle := Normal; HasInfoBar : boolean := false; > CallBack : AWindowDrawingCallBack := null ); > >Probably you could just remove all occurrences of To255(), and change >the first line of the statement to > > OpenWindow( "Demo Window", -- title at top of window I don't remember where ttdemo came from. Perhaps an earlier version ot the texttools. So I decided to use uio_ and uio2_ programs. These compiled. But generated lots of linker unresolved symbol errors. The commandline I used was: gnatmake -g -gnatf -gnato -fstack-check -gnatVa -gnatwu -gnat2012 -lm -lncurses How do I resolve those? Thanks for your help