HDTenEightyP/NetNews huggingface dataset:
From: bwilliams@marvin.ag.uidaho.edu (Brad Williams)
Newsgroups: comp.lang.pascal
Subject: Re: BP 7.0 bug??????
Date: 25 Jan 93 20:46:44 GMT
Article-I.D.: marvin.bwilliams.12.727994804
Organization: College of Agriculture, University of Idaho

In article <35180@adm.brl.mil> lee@cpu.us.dynix.com (Lee Crites) writes:
>From: lee@cpu.us.dynix.com (Lee Crites)
>Subject: Re: BP 7.0 bug??????
>Date: 22 Jan 93 19:17:42 GMT
>On 22 Jan 1993, Duncan Murdoch wrote:
>> In article <35168@adm.brl.mil> lee@cpu.us.dynix.com (Lee Crites) writes:
>> >I am getting this message a LOT with BP7.  Is there a bug here?  I have
>> >4meg of RAM, and set up my computer so that the only TSR's kicking around
>> >are the mouse driver and SSTOR (SuperStore disk compression utility).  I
>> >ought to have loads of room, but can't seem to get at it.  I can't even
>> >get most of the TV demos to run from within the IDE (^F9) without running
>> >out of memory.  I played with this some last night, but didn't make any
>> >headway.  I ran the utility that cam with BP7 to test the EMS, and it
>> >worked fine.  I also have the IDE set up to use EMS (something I had to do
>> >quite early just to get some of my other programs to compile).
>> 
>> It sounds as though you're using TURBO, not BP, since BP can't use EMS.  
>> TURBO has the same limitations as it did in 6.0 - only edit buffers go into 
>> EMS, all the rest has to fit in low RAM.  If you want to make good use of 
>> all of your memory, you have to use the protected mode IDE instead.
>> 
>> Duncan Murdoch
>
>Thanks.  Yes, you are right, I am using TURBO.  TP7 must take up more room
>than TP6 did, because some of the things that I could compile and run
>under TP6 won't under TP7.  It's kind of annoying to have to exit to DOS,
>TPC /m whatever, then go back in.  Another problem is that the IDE will
>allow you to specity a list of subdirectories to search for TPU's but the
>command line compiler doesn't recognize that list.  I have to copy the
>TPU's from all over into the current subdirectory to get TPC to work. 
>It's a real pain in the, uh, well, you know.
>
The command line compilers (CLC) do take switches to specify the 
subdirectories for units.  Run the CLC without any input file and read the 
screen to get a list of switches.


----------------------------------------------------------------------
Dr. Brad Williams, Campus Veterinarian
Animal and Vet Science        Phone:    (208) 885-8958
University of Idaho           FAX:      (208) 885-6420
Moscow, Idaho 83843           Internet: bwilliams@marvin.ag.uidaho.edu
----------------------------------------------------------------------
Newsgroups: comp.lang.pascal
From: herman@nosc.mil (John W. Herman)
Subject: Address for Oregon Software
Organization: Naval Ocean Systems Center, San Diego, CA
Date: Thu, 21 Jan 1993 16:01:59 GMT


--
I am looking for information on the Oregon Software Pascal Compiler and
the company address and phone number.  Thank you.
From: wbdst+@pitt.edu (William B Dwinnell)
Newsgroups: comp.lang.pascal
Subject: Re: Help w/ THINK Pascal!
Date: 28 Jan 93 05:32:49 GMT
Organization: University of Pittsburgh


Greg:  Oh, I may be mistaken, but I thought Assign was used in 
VAX Pascal as well.  I agree with you: Assign seesxxx seems
superflous when Reset/Rewrite will do.
Newsgroups: comp.lang.pascal
From: "jeff zeitlin" <jeff.zeitlin@execnet.com>
Subject: there is no decompile
Reply-To: "jeff zeitlin" <jeff.zeitlin@execnet.com>
Organization: Executive Networks Information
Distribution: comp
Date: 21 Jan 93 02:49:02 EST

GB::>Actually, I have found that using the Finnish version of the 80386
  ::>processor and the Finnish version of DOS greatly contributes to
  ::>reverse engineering Finnish programs. I have to admit, though, that
  ::>programs written in Arabic have me stumped. Any suggestions?

  Recall that the Arabic language is written right-to-left, as
  opposed to left-to-right like the vast majority of Western
  languages.  Obviously, you will have to start your decompile of
  Arabic programs at the _end_, rather than the beginning.
  Furthermore, the shape of Arabic letters is dependent on what
  letters precede and follow the letter being examined, and which
  form those letters are taking.  Hence, a single-pass decompiler
  is unlikely to work.  Note that using the Arabic version of DOS
  and the '386 will not be sufficient, as most Arabic computers,
  being made in the U.S. or Japan, have an English mode available,
  which your English decompiler will use by default.

  As a side remark, to get your decompiler to work on Hebrew
  programs, you will have to copy the Arabic compiler onto a
  diskette of a different color.

  J/
  jeff.zeitlin@execnet.com

 * QMPro 1.01   * memory fault: core dumped
--
Executive Network Information System  (914) 667-4567
International ILink Host
Newsgroups: comp.lang.pascal
From: billb@crpmks.uucp (Bill Bochnik (Info Systems))
Subject: Re: Can't use redirection ">" with EXEC call ???
Reply-To: billb@crpmks.UUCP (Bill Bochnik (Info Systems))
Organization: Ciba-Geigy Corporation
Date: Tue, 26 Jan 1993 16:22:49 GMT

In article <C1Bo2x.K6s@DMI.USherb.CA> desrg00@DMI.USherb.CA (GUY DESROSIERS) writes:
>	I trying to do something like that (under TP 6.0)
>
>	Exec('c:\dos\xcopy.exe', 'b:*.* > result.txt');
>
>	I want to redirect the output in a file (result.txt).
>	Exec doesn't seem to like redirection. Any idea what I
>	do wrong.
>
>	Thanks in advance.
>
>Guy DesRosiers
>Universtity of Sherbrooke
>E-Mail: desrg00@dmi.usherb.ca
>

I could be wrong, but I think that the redirection is a function of 
COMMAND.COM.  If that is the case, you need to EXEC COMMAND.COM, and pass it 
the xcopy b:*.* >result.txt as the rest of the command.  

-- 
Bill Bochnik			| It's hard to be a James Bond in an Abbott
Systems Analyst 		|	and Costello world.
Ciba-Geigy Corporation		| Signed and sealed, they deliver oblivion.
philabs!crpmks!billb		| It's worse than that, he's dead Jim.
From: wbdst+@pitt.edu (William B Dwinnell)
Newsgroups: comp.lang.pascal
Subject: Re: help ??
Date: 22 Jan 93 13:54:16 GMT
Organization: University of Pittsburgh


"SHR" means "shift right" (thus "SHL" means "shift left".  These are bit-level
operations, which can be quite handy, although I don't know if they
are supported in all Pascals (Turbo has them, though). SHR, for instance,
shifts all the bits right in the variable it is given, and typically
you can tell it how many bits to shoftxxxx shift.
The AND is probably a Booleand AND, where Booleans are represented
by integer values.
What would happen if vi = 2, etc. would depend on your compiler,
but the usual thing is for the lowest bit to be the actual Boolean
value, the rest of the number being wasted space (no, kids, Boolansxxx
Booleans DON'T usually take up 1 bit of space: its usually 8 at least).
Got it?
Newsgroups: comp.lang.pascal
From: chard@borland.com (Richard Nelson)
Subject: Re: TP7 memory problems when compiling
Summary: Curing DPMI startup blues
Originator: chard@genghis.borland.com
Keywords: RTMRES
Organization: Borland International
Date: Tue, 26 Jan 1993 00:40:55 GMT

In article <1993Jan21.101001.14439@rulway.LeidenUniv.nl> jeroenp@rulfc1.LeidenUniv.nl (Jeroen W. Pluimers) writes:
>There is another inconvenience with the command line compilers. As they use 
>DPMI, they start up a bit slowly on my system. That makes using them under
>an external editor a lot slower than using the IDE.  It looks like I'll go
>to use the IDE a lot now :)

Not a bad solution, but not the only one, either.  In situations where
you're going to be starting a lot of protected-mode applications,
where you don't want to have to wait for the startup every time, you
can load the resident version of the run-time manager, RTMRES.  That
starts up DPMI services so your individual apps don't have to, making
startup time much shorter on such things as the command-line compiler,
or a DPMI app you're testing.
-- 
=========================================================================
 Richard Nelson, Borland Int'l | chard@borland.com | Go Bears! Grrr-rah!
  Had this been Borland's opinion, I would have written it in a manual.
      "How can love survive in such a graceless age?" - Don Henley
From: lfosdal@falcon.no (Lars Fosdal)
Newsgroups: comp.lang.pascal
Subject: Re: TPW: How to get a pointer from a handle
Date: Tue, 26 Jan 93 18:29:07 MET
Organization: Falcon Information Services AS, Oslo, Norway

focke@gmd.de (Stefan Focke) writes:

> If I create a brush or a bitmap I get its handle. Is it possible to find the 
> address where this brush or bitmap is realy stored. 

This is one for the FAQ!

Assuming you've got a valid handle (hBM):
VAR
 hBM : hBitMap;
 BM : TBitMap; {Lots of nice info in this one...}
 
BEGIN
  .
  hBM gets a valid handle
  .
  :
  IF GetObject(hBM, SizeOf(TBitMap), @BM)<>0
  THEN BEGIN {We've got a valid bitmap)
  
    BM.bmBits now points to the bitmap bits.
  
  END;


Also, Check out the Set/GetBitmapBits functions (WinProcs).


Lars F.
--
/ Mr.Lars Fosdal              / Falcon AS            / lfosdal@falcon.no  /
/ Software Developer          / Stranden 1           / Tel. +47 22831310  /
/ Financial Analysis Systems  / N-0250 OSLO, Norway  / Fax. +47 22831290  /
----=* All opinions are personal and does not reflect company policy *=----
From: lee@cpu.us.dynix.com (Lee Crites)
Newsgroups: comp.lang.pascal
Subject: Re: BP 7.0 bug??????
Date: 22 Jan 93 19:17:42 GMT

On 22 Jan 1993, Duncan Murdoch wrote:
> In article <35168@adm.brl.mil> lee@cpu.us.dynix.com (Lee Crites) writes:
> >I am getting this message a LOT with BP7.  Is there a bug here?  I have
> >4meg of RAM, and set up my computer so that the only TSR's kicking around
> >are the mouse driver and SSTOR (SuperStore disk compression utility).  I
> >ought to have loads of room, but can't seem to get at it.  I can't even
> >get most of the TV demos to run from within the IDE (^F9) without running
> >out of memory.  I played with this some last night, but didn't make any
> >headway.  I ran the utility that cam with BP7 to test the EMS, and it
> >worked fine.  I also have the IDE set up to use EMS (something I had to do
> >quite early just to get some of my other programs to compile).
> 
> It sounds as though you're using TURBO, not BP, since BP can't use EMS.  
> TURBO has the same limitations as it did in 6.0 - only edit buffers go into 
> EMS, all the rest has to fit in low RAM.  If you want to make good use of 
> all of your memory, you have to use the protected mode IDE instead.
> 
> Duncan Murdoch

Thanks.  Yes, you are right, I am using TURBO.  TP7 must take up more room
than TP6 did, because some of the things that I could compile and run
under TP6 won't under TP7.  It's kind of annoying to have to exit to DOS,
TPC /m whatever, then go back in.  Another problem is that the IDE will
allow you to specity a list of subdirectories to search for TPU's but the
command line compiler doesn't recognize that list.  I have to copy the
TPU's from all over into the current subdirectory to get TPC to work. 
It's a real pain in the, uh, well, you know.

           =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
            lee@us.dynix.com | If it ain't broke yet,
                             |   let me have a shot at it....
           =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=



From: karen@hpsgwr.sgp.hp.com (Vacation Student)
Date: Wed, 20 Jan 1993 02:39:59 GMT
Subject: Single character inputs (Again...)
Organization: HP Singapore Asian Design Ctr
Newsgroups: comp.lang.pascal


>I'm asking for some solution to this small problem for a friend.
>I've not used pascal for some 5 years now so I couldn't give him
>a solution. anyway the question is:
>During the execution of the program, I want to enter a letter or
>key which will immediately execute the next program line without
>having to enter a <Return>
>It's a bit like the "getch" in curses when using C. In the case of "getch",
>the program waits for the user for input. The user enters a key and
>immediately the next action is taken.(without having to enter <Return>)
>I wonder if there is a way to do this in pascal.
>all I know is that in pascal, "readln" expects a <Return> to signify
>termination of an input. Is there anything for character manipulation?

>karen

Hi again folks,
 
I refer to the above problem I posted some days back. My friend is
using Digital's Vax Vms Pascal.  I had several replies offering 
solutions using Turbo pascal. Thanks guys. Sorry I didn't give the
above info earlier. If any of you are familiar with the digtal's
vms pascal, perhaps you could drop me some probable solutions. 

Which brings me to my next problem. Nothing on pascal at all actually.
I'm new here (as you can see from my address above, I'm just a 
"Vacation Student" at HP (vacation indeed...). I'm currently 
at Nanyang Technological University (Singapore) and doing my Industrial
attachment now). Anyway, I've only been playing around with "notes"
(or "news" whatever you call it) for a week or so and pretty green
about it.           

I just had a look at notes at my friend's place yesterday(she's
modeming from home) and discovered that her index page for comp.lang.pascal
(and other news groups as well) were filled with lots of messages
while mine (believe it or not) still only contains a single 
message, which was what I posted on 13 Jan("Prob: Single character inputs").
On my friend's notes, it was indicated that I had 1 response. However
over here, there's no indication at all and no other new messages.
Is it because i get limited access to all the messages posted from
around the world? Or is it because my server here does not allow
certain things to pass through? Perhaps someone can tell me or refer
me to a newsgroup from which I can get more information regarding
these matters. 

As far as my above pascal problem is concerned, I've received replies which
went directly to my mail and thus I have no problem receiving and
reading them. As such, please mail/reply any further messages to my
above address, until I can find out why I cannot receive the bulk of
messages or responses. Thanks again folks.

"Vacation"(!!) Student
karen
From: didi@casm.insa-lyon.fr ()
Newsgroups: comp.lang.pascal
Subject: FFT and others... help
Date: 27 Jan 1993 20:25:39 GMT
Organization: insa lyon
Distribution: world
NNTP-Posting-Host: pervenche.insa-lyon.fr

Hello,

I'm new in new in news !

I'm looking for some references or sources for optimized FFT subroutines
and more for cross transfert function, correlation and interspectre function, 
and of course coherence function.
	If you have some of them in Turbo Pascal 5.5 or 6.0 but not in object
version, I'm happy to know how to get them...

At the same time, I'm searching some references or indications for testing some 
of these subroutines. Is there any reference or validation tests out there ?

Great thanks for response

My adress is :
-------------------------------------------------------------------
 Didier REMOND
 Labo C.A.S.M.   Bat. 113         Tel    : (33) 72.43.83.40
 I.N.S.A. Lyon                    Fax    : (33) 78.94.60.98
 20, Avenue Albert EINSTEIN       E-mail : didi@casm.insa-lyon.fr
 69 621   VILLEURBANNE CEDEX
 FRANCE
-------------------------------------------------------------------
From: me21tg@surrey.ac.uk (Mr Timothy Green)
Newsgroups: comp.lang.pascal
Subject: Re: XCOPY in the background ?
Date: 22 Jan 93 20:28:49 GMT

Try using a DOS box in Windows or OS2 to achieve DOS commands in the
background.

Alternatively, don't use DOS and stick to Unix!
From: pf@bilbo.bio.purdue.edu (Paul Furbacher)
Newsgroups: comp.lang.pascal
Subject: Re: Questions about Constructors and pointers to objects in TP 6
Date: 24 Jan 93 01:12:51 GMT
Followup-To: comp.lang.pascal
Organization: Purdue University

In article <930023.163019.achristo@nutri1>, achristo@pons.uio.no (Alf
Christophersen) pointed out an error in my article:

> I think maybe you lost something important in the TDerived
> decalration!
> [...]
> >      PDerived = ^TDerived;
> >      TDerived = object(TBASe)
>                         ^^^^^^^ <- You need to declare what
>                         TDerived is derived from to have this

Copying and pasting got me.  I thought I had proof-read that
article a sufficient number of times.  Obviously not.

Thanks, Alf.


Paul Furbacher
pf@bilbo.bio.purdue.edu
From: tp923021@jarrah.canberra.edu.au (ben elliston)
Sender: gateway@f262.n620.z3.fidonet.org
Newsgroups: comp.lang.pascal
Subject: BIG blockwrites!
Date: Wed, 27 Jan 1993 01:25:00

I'm trying to write out several structures to a typed file on disk.

I'm using:

blockwrite(thefile, struct_1, sizeof(struct_1));
blockwrite(thefile, struct_2, sizeof(struct_2));
blockwrite(thefile, struct_2, sizeof(struct_3));

.. and so on.  Only about 3 of them anyway.

The problems are:

1.  Struct_2 has three null-terminated fields.  These contain people's names. These names are NOWHERE to be found when viewing the file with Xtree (in hex view mode).

2.  The total size of the structures is about 300 bytes. The file, when closed, goes well over 30k in size!  I've seen this before, and I never worked out what I actually did to fix it.

Any suggestions would be most appreciated.

Cheers, Ben

Newsgroups: comp.lang.pascal
From: samodena@csemail.cropsci.ncsu.edu (S. A. Modena)
Subject: Re: [BP7.0] Syntax colors
Organization: Crop Science Dept., NCSU, Raleigh, NC 27695-7620
Date: Thu, 21 Jan 1993 21:11:20 GMT

In article <30011@oasys.dt.navy.mil> roth@oasys.dt.navy.mil (Pete Roth) writes:
>In comp.lang.pascal, BAKERRE@awc1.eglin.af.mil (Baker, Robert E.) writes:
>[...]
>>I can't seem to get a good color
>>scheme together that looks OK to me.  For just an informal poll, what types of
>>color schemes does everyone else have?
>
>My eyes like: green background, white foreground, comments in light green,
>reserved words in yellow.  That's it, 4 colors.
>As a warning, TASM text in magenta on purple...

The Productivty Color Scheme for Type A personalities is:

	Background: Brown
	Symbols: White
	WhiteSpace: Yellow
	Comments: Gray
	Reserved Words: Green
	Identifiers: Yellow
	Symbols: White
	Strings: Black
	Numbers: Black
	Assembler: Green

And I left the scroll bars blue/cyan.  :^)

Steve
---
+------------------------------------------------------------------+
|     In person:  Steve Modena     AB4EL                           |
|     On phone:   (919) 515-5328                                   |
|     At e-mail:  nmodena@unity.ncsu.edu                           | 
|                 samodena@csemail.cropsci.ncsu.edu                |
|                 [ either email address is read each day ]        |
|     By snail:   Crop Sci Dept, Box 7620, NCSU, Raleigh, NC 27695 |
+------------------------------------------------------------------+
         Lighten UP!  It's just a computer doing that to you.    (c)
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
From: system@kalki33.lakes.trenton.sc.us (Kalki Dasa)
Newsgroups: comp.lang.pascal
Subject: Re: BP 7.0 bug??????
Date: Sun, 24 Jan 93 03:03:29 EST
Organization: Kalki's Infoline BBS, Aiken, SC, USA

lee@cpu.us.dynix.com (Lee Crites) writes:

> Another problem is that the IDE will
> allow you to specity a list of subdirectories to search for TPU's but the
> command line compiler doesn't recognize that list.  I have to copy the
> TPU's from all over into the current subdirectory to get TPC to work. 
> It's a real pain in the, uh, well, you know.

You can create a tpc.cfg file that lists the same search directories as
turbo.tp, so that the in-line compiler knows where to look. Check the
manual.

Kalki Dasa


       ---------------------------------------------------------
      |                Don't forget to chant:                   |
      |                                                         |
      |  Hare Krishna Hare Krishna, Krishna Krishna Hare Hare   |
      |       Hare Rama Hare Rama, Rama Rama Hare Hare          |
      |                                                         |
      |    Kalki's Infoline BBS Aiken, South Carolina, USA      |
      |           (kalki@kalki33.lakes.trenton.sc.us)           |
       ---------------------------------------------------------
From: amusgrov@scotmhs.fred.org (Aj musgrove)
Newsgroups: comp.lang.pascal
Subject: Re: Returned mail: User unknown
Date: 25 Jan 93 17:17:46 GMT
Article-I.D.: scotmhs.4DHyXB1w165w
Organization: Scotlandville Magnet High School
NNTP-Posting-Host: cs.utexas.edu

>From acme.fred.org!MAILER-DAEMON  Thu Jan 21 21:23:07 1993 remote from scotmhs
Received: by scotmhs.fred.org (1.65/waf)
	via UUCP; Fri, 22 Jan 93 04:18:16 EST
	for amusgrov
Received: by acme.fred.org (5.65/1.35)
	id AA25652; Thu, 21 Jan 93 21:23:07 -0800
Date: Thu, 21 Jan 93 21:23:07 -0800
From: acme.fred.org!MAILER-DAEMON (Mail Delivery Subsystem)
Subject: Returned mail: User unknown
Message-Id: <9301220523.AA25652@acme.fred.org>
To: scotmhs!amusgrov

   ----- Transcript of session follows -----
>>> RCPT To:<comp-lang-pascal@ucbvax.berkeley.edu>
<<< 550 <comp-lang-pascal@ucbvax.berkeley.edu>... User unknown
550 comp-lang-pascal@ucbvax.berkeley.edu... User unknown

   ----- Unsent message follows -----
Received: by acme.fred.org (5.65/1.35)
	id AA25650; Thu, 21 Jan 93 21:23:07 -0800
Received: by scotmhs.fred.org (1.65/waf)
	via UUCP; Thu, 21 Jan 93 11:15:02 EST
	for comp-lang-pascal@ucbvax.berkeley.edu
To: comp-lang-pascal@ucbvax.berkeley.edu
Subject: Needed: A Recursive binary search function
From: amusgrov@scotmhs.fred.org (Aj musgrove)
Message-Id: <kTiqXB1w165w@scotmhs.fred.org>
Date: Thu, 21 Jan 93 11:11:19 EST
Organization: Scotlandville Magnet High School

finocchiaroj@merrimack.edu writes:

> I need the code for a recursive binary search function and if anyone has or
> knows of one off hand I would really appreciate if you would mail me the
> code for it.
> 
> Thanks,
> 	finocchiaroj@merrimack :)


Ok, it'll be a mirical if this post makes it out of the system, but here 
is the code for the function that you want:

First, the type declaration:
TYPE
   st20 = string[20];
   nodeptr = ^node;
   node = RECORD
          data : st20;
          left, right : nodeptr;
          END;

Now, the 'find' (search) procedure:
PROCEDURE Find( Tree : nodeptr; VAR loc : nodeptr; tofind : st20 );
BEGIN
   IF tree <> nil THEN
   BEGIN
      IF tofind = tree^.data THEN loc := tree
      ELSE
         if tofind < tree^.data THEN find(tree^.left,loc,tofind) ELSE
            find(tree^.right,loc,tofind);
   END;
END;

The original parameter 'loc' should be nil. Tofind is the search string, 
and the original Tree is the root of your tree. If you follow the logic 
of binary trees, then you will see that It decides 'higher' or 'lower' 
and goes that way, until it finds what it is looking for, or runs out of 
places to look.

It will return a pointer to the proper node in 'loc', or 'loc = nil' if 
it isn't found.

AJ
From: mike.dickson@almac.co.uk (Mike Dickson)
Newsgroups: comp.lang.pascal
Subject: Re: Avoiding system error
Date: 23 Jan 93 17:05:00 GMT
Reply-To: mike.dickson@almac.co.uk (Mike Dickson)
Organization: Almac BBS Ltd. +44 (0)324 665371

EH..The compiler directives {$I-} and {$I+} turn IO error checking off and on.
EH..It's a good idea to turn it off before opening files and such, and then
EH..checking DOSError to see if things are ok

No, it's IOResult you ought to check for IO errors like this; DOSError
only reports on erors returned by the operating system.

/\/\ | |< |.                                     mike.dickson@almac.co.uk
---
 . SLMR 2.1a . Official Tagline of the 1992 Olympics
                                                   
Newsgroups: comp.lang.pascal