HDTenEightyP/NetNews huggingface dataset:
From: s8921366@macgraw.mqcs.mq.oz.au (Paul English)
Subject: Re: prolog <---> pascal ???
Organization: Macquarie University, School of Mathematics, Physics, Computing and Electronics
Date: Fri, 2 Oct 1992 08:03:35 GMT

In article <10468@vice.ICO.TEK.COM> bobb@vice.ICO.TEK.COM (Robert Beauchaine) writes:
>In article <1992Sep30.043754.12118@mailhost.ocs.mq.edu.au> s8921366@macgraw.mqcs.mq.oz.au (Paul English) writes:
>>Turbo Pascal does in fact make .OBJ files, but you will not see them if you
>>do a 'Compile to .EXE' compilation (the default).  On the compilation menu
>>you should be able to find a 'Compile to .OBJ' (or similar) option, which
>>you need to use.
>
>  I'm sure you'll get more replies to this post than you will care
>  to read, but you apparently don't use the same Turbo Pascal that I
>  use.
>

As I pointed out it has been a while since I used Turbo Pascal.  This is
the first reply, so I'll short circuit the rest now.  I think I was
confusing Turbo Pascal with Turbo C++, which I use much more often.  I've
just test Turbo Pascal 5.0, and there are no such options as Compile to .???
I did manage to have an *.OBJ generated in test compilations, but I was
unable to replicate it, and I can't for the life of me remember how I got
it.  I've tried all the Make, Build and Compile options since, with no
success.  It appears Turbo Pascal in fact generates *.TPU files, which are
*.OBJ files under a different name, but which may be incompatible when
linking into other code.  During compilation it normally compiles object
code into memory, though disk is an option, and object code is lost on
completion of the compile.

IMHO This is an absurd state of affairs, the object code must be generated
in order to compile, so why not have an option to keep it in *.OBJ format?


--
    Paul English    |Email:                        |You can tell how far
   School of MPCE   |s8921366@mackay.mpce.mq.edu.au|we have to go when
Macquarie University|    paul@vulcan.anu.edu.au    |today's supercomputers
 Sydney, Australia  |                              |are programmed in FORTRAN
From: thompson@atlas.socsci.umn.edu (T. Scott Thompson)
Newsgroups: comp.lang.pascal
Subject: Re: Turbo Pascal 7.0
Date: 28 Sep 92 23:23:26 GMT
Reply-To: thompson@atlas.socsci.umn.edu
Organization: Economics Department, University of Minnesota

chard@genghis.borland.com (Richard Nelson) writes:

>In article <1992Sep26.212055.528@ifi.uio.no> espenk@ifi.uio.no (Espen Frimann Koren) writes:
>>
>>I think T. Scott Thompson's example with small, crawling and blood-sucking
>>bugs were cute, and instructive. A 'real' problem like this would need
>>multiple inheritance to be solved nice and clean.

>I have yet to see an example where multiple inheritance does anything
>you can't do with single inheritance.  The differences are generally
>just semantic.  Admittedly, you sometimes get slightly clearer code
>with the multiply-inherited version, but IMHO that doesn't justify
>cluttering the language.

Let me extend your argument: I have yet to see anything that can be
done with objects that you can't do without them.  In _my_ humble
opinion, adding objects to TP significantly "cluttered" the language.
Therefore I conclude that we should drop objects from TP.

My actual position is that if you are going to do OOP, do it right.
Don't make us jump through hoops to get the effect of multiple
inheritance.

>My best guess (Not, of course, the official position of Borland Int'l)
>is that you won't find multiple inheritance in Turbo Pascal objects
>until and unless there evolves some standard for sharing objects created
>across different languages.  The need to accommodate multiply-inherited
>imported objects *might* justify the extension to the language.

I don't see why this would be an issue.  Importation of objects (or
object types) does not require you to do any particular thing with
them.  TP could choose to import/not-import objects regardless of
whether or not it implemented multiple inheritance.

>From what I've seen (although admittedly, I haven't seen a lot of
>crawling, blood-sucking insect simulations), most cases where people
>argue for multiple inheritance can be handled very easily with single
>inheritance.  People who aren't willing to explore other solutions
>are usually too inflexible about their coding, anyway.  IMHO, of course.

Certainly multiple inheritance can be easily approximated now by
including an instance of one object inside another object type.  The
issue is whether or not this is really the best solution.  One reason
that I use Pascal instead of Fortran is that Pascal allows natural
implementation of abstract data types.  Is it right to say that I
should stick with Fortran because I can approximate the same data
structures if I just allow for more "flexible" coding?  This seems to
be the kind of logic that you are using.
--
T. Scott Thompson              email:  thompson@atlas.socsci.umn.edu
Department of Economics        phone:  (612) 625-0119
University of Minnesota        fax:    (612) 624-0209
From: wct@po.CWRU.Edu (William C. Thompson)
Newsgroups: comp.lang.pascal
Subject: Re: Bubble Sort Routine
Date: 4 Oct 1992 16:26:13 GMT
Organization: Case Western Reserve University, Cleveland, OH (USA)
Reply-To: wct@po.CWRU.Edu (William C. Thompson)
NNTP-Posting-Host: slc5.ins.cwru.edu


Jesus, can't someone just help the poor guy out?  Quit telling
him BubbleSort sucks (even though it does) and just give him
the help he needed!  Maybe he was specifically asked to write
a bubble sort routine.  Christ!

Anyway, this is basically how it goes: You search through the
array one element at a time.  If two elements are out of order,
you swap them.  You repeat this process until you didn't swap
any elements, that is, it's sorted.  Codewise:

const
  maxitems=100;
var
  a: array[1..maxitems] of real;
  temp: real;
  i: integer;
  done: boolean;

begin
  { input array }

  { sort array }
  repeat
    done:=true;      { set to false if you swap something }
    for i:=2 to maxitems do 
      if a[i-1]>a[i] then    { a[i-1] and a[i] are out of order }
        begin
          done:=false;
          { swap a[i-1] and a[i] }
          temp:=a[i];
          a[i]:=a[i-1];
          a[i-1]:=temp;
        end;
  until done;
end.
-- 
"What do you mean Star Trek isn't real!?" - anonymous
Newsgroups: comp.lang.pascal
From: wolfr@messua.informatik.rwth-aachen.de (Wolf Ritschel)
Subject: math library for turbo-pascal wanted
Keywords: turbo math
Organization: Rechnerbetrieb Informatik  /  RWTH Aachen
Date:  1 Oct 92 19:49:20 GMT

Im loking for a good and fast (perhaps with assembler routines) library
for turbo pascal (or c ). It should contain functions for matrix multiplication
and other numeric functions. 

THANX

Wolf

Newsgroups: comp.lang.pascal
From: richard@smok.demon.co.uk (Richard Clyne)
Subject: Command Line Arguments + Turbovision 
Distribution: world
Organization: Richard Clyne (Home System)
Date: Sat, 26 Sep 1992 21:00:34 +0000


In article <BuuEnv.Mo3@mentor.cc.purdue.edu> pf@bilbo.bio.purdue.edu writes:

>
>
>In article <716764466snx@smok.demon.co.uk>, 
>richard@smok.demon.co.uk (Richard Clyne) writes:
>> 
>> [...] I am planing to use a unix style command line, and
>> need to parse the command line to find which flags are set, and 
>what value
>> the flags are set to....
>
>I cannot direct you to any PD/shareware utilities/code which will 
>do this.  They might exist, I simply don't know and wouldn't spend 
>much time on it, *myself*.  You talk (see below) about using 
>TurboVision (TV), and yet want to stick to the *old* propeller-
>head style of torturous command line switches -- die Unix, die.  
>(I can't be painted as being derogatory here 'cause I'm president 
>of the local chapter of propeller heads.  Sorry, just trying to 
>introduce some levity.  On another point, NeXTStep is based on 
>UNIX, and that is pretty nice: when's TP 1.0 for NeXT486 due?)
>
>The modern way would be to offer a dialog box *within*
.
.
.
>yourself with a little more persistence.
>
>Good luck.
>
>PF
>
>
>

The command line options are really only to indicate to the program where to
find the config files. I need to be able to read files from two different
directories on start up, and I don't want to restrict the options. The
defaults will be sensible enough that most users won't use the command line
options.

--
Richard Clyne
319 Violet Lane, Croydon, Surrey, CR4 4HN. Tel +44 (0)81 686 7159
richard@smok.demon.co.uk
rclyne@cix.compulink.co.uk
From: Ricardo.Landrau@f28.n367.z1.FIDONET.ORG (Ricardo Landrau)
Newsgroups: comp.lang.pascal
Subject: Comb Sort
Date: Tue, 29 Sep 92 20:12:51 EDT
Organization: FidoNet node 1:367/28 - The Island Wolf, Carolina PR

Anybody got a ported version of the comb sort to Turbo Pascal 6.0 ???

It may be helpful since it is faster thant he bubble sort!

Ricardo Landrau
Fidonet 1:367/28.0
Carolina Puerto Rico

--  
Internet: Ricardo.Landrau@f28.n367.z1.FIDONET.ORG
UUCP: ...!myrddin!tct!psycho!367!28!Ricardo.Landrau
Note:psycho is a free gateway between Usenet & Fidonet. For info write to
     root@psycho.fidonet.org.
From: system@micromed.com (Duane Davis)
Newsgroups: comp.lang.pascal
Subject: Diskette detection
Date: Sun, 27 Sep 92 23:41:47 PDT
Organization: Micro-Medic BBS - +1 408 279 5240 - Public Access


I'm looking for a quick easy way to:

     a. Detect if a diskette in inserted in a floppy drive

     b. If a disk is inserted, is it formatted?

I've checked all my reference manuals and none go into this. I have
figured out a way to do it but it takes a long time to determine that
the disk in the drive is un-formatted. I am working on a program that
will prompt the user to insert a disk, detect when the disk is inserted,
and format it if needed.

If you respond to this message in news please also mail me a copy as I
don't get into this group often.


--
System@micromed.com (Duane Davis)                   voice (408)293-3299
Micro-Medic                          public access usenet (408)279-5240
711 Lincoln Avenue                  public access pcboard (408)280-1610
San Jose, CA 95126                    FileServer - FTPMail@micromed.com
Newsgroups: comp.lang.pascal
From: samodena@csemail.cropsci.ncsu.edu (S. A. Modena)
Subject: Rest In Peace
Organization: Crop Science Dept., NCSU, Raleigh, NC 27695-7620
Date: Tue, 29 Sep 1992 20:03:50 GMT

I QUOTE WITHOUT PERMISSION:

"R.I.P. Frontier

Frontier Software has quitely gone out of business, taking FS:Pascal
with them into history.  They advertised heavily until the end, so
don't send them any more orders."

from Editor's NotePad
     PC Techniques 3(4):10 (Oct/Noc) 1992
---
+------------------------------------------------------------------+
|     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.
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
From: pf@bilbo.bio.purdue.edu (Paul Furbacher)
Newsgroups: comp.lang.pascal
Subject: Re: Learning Pascal...
Date: 6 Oct 92 03:58:37 GMT
Distribution: comp.lang.pascal
Organization: Purdue University

In article <Meo9RnC00WB_8juExm@andrew.cmu.edu>, 
  tb0o+@andrew.cmu.edu (Todd Keenan Bowman) writes:
> 
> I'm trying to learn how to program in Pascal.  The software I plan to use will
> be Symantic's THINK Pascal.

Since you'll probably get an educational discount, go out, buy it and
read page 9, "What You Should Know" of the User Manual.  The first sub-section
is entitled "Learning Pascal".  They were "thinking" of you.

TP 4.0 (T as in Think) no longer comes with an "easy" pascal which served 
as a tutor.  You might call the present owner (Symantec) and ask them
if that product is still available.  

PF
Newsgroups: comp.lang.pascal
From: trodgers@nmsu.edu (Thomas Rodgers)
Subject: Who's using this Interrupt Vector?
Organization: NMSU Computer Science
Distribution: comp.lang.pascal
Date: Tue, 29 Sep 1992 17:40:42 GMT

I have a section of TPW1.5 code that works *MOST* of the time flawlessly,
however occasionally I will get an exception 13.  It generally occurs
in the same procedure every time, but I can't find the exact line that
generates the problem, because it *NEVER* does it when I am tracing
through the code.  I can however examine the call stack afterwords,
and I find that after my routines entry there are two other entries.
One seems to be an interrupt service, which examines the contents of
vector 3E (int21 function 353E) and generates a call to the other
function.  The other function is at offset 004Ch from the start of the
system unit.

Anybody got any thoughts on what these functions are doing.  


--------
Tom.
From: Berend.de.Boer@p23.f112.n100.z60.wlink.nl (Berend de Boer)
Newsgroups: comp.lang.pascal
Subject: TVision - Anything I should know?
Date: 5 Oct 92 10:11:18 GMT

S. A. Modena wrote in a message to All:

>First, the TV manual is messed up in my opinion.

 S  > Oh oh!  Jeff Duntemann is going to be disappointed to hear
 S  > that....'cuz I think he did the manual for Borland......

He did only the first chapter.


Groetjes, ...... === Ent === 

berend.de.boer@contrast.wlink.nl
Newsgroups: comp.lang.pascal
From: konopka@ils.nwu.edu (Ray Konopka)
Subject: Re: Turbo Pascal 7.0
Organization: The Institute for the Learning Sciences
Date: Mon, 5 Oct 1992 20:24:05 GMT

In article <dmurdoch.210.718306713@mast.queensu.ca> dmurdoch@mast.queensu.ca (Duncan Murdoch) writes:
>In article <1992Oct5.151540.7010@ils.nwu.edu> konopka@ils.nwu.edu (Ray Konopka) writes:
>>
>>For those of you not familiar with C++, protected fields cannot
>>be accessed directly outside of the methods of the class, BUT
>>they can be accessed by methods of descendant classes.  See the
>>example below:
>>
>>type
>>    ClassA = object
>>	data1 : Integer;
>>        procedure proc1;
>>    private
>>	data2 : Integer;
>>    end;
>>
>>    ClassB = object( ClassB )
>>	data3 : Integer;
>>	function fcn1 : Boolean;
>>    end;
>>
>>Note, that under TP v6, that proc1 can access data2, but nothing
>>else can, not even fcn1.  If data2 were declared as 'protected',
>>then fcn1 could access data2, but data2 could not be accessed
>>directly by any object instance.
>
>TP doesn't have anything like "protected" fields, but your understanding of
>"private" ones is a little bit off:  in fact, fcn1 *can* access data2, as
>can any method or other procedure declared in the same unit as ClassA.
>The idea is that you should localize implementation specifics to a unit, but
>within a unit, anything goes.
>
>I like this idea better than the C++ "protected" idea.  Why should 
>descendants be able to mess around with implementation details, when other 
>code can't?  This doesn't protect you from writing descendant code that 
>breaks when you change the implementation, which is really the point of 
>hiding it.
>
>Duncan Murdoch
>dmurdoch@mast.queensu.ca

Well, how about that!  You're Right!  I just tried it, and I stand 
corrected.  Actually, I need to change my opinion on the idea of
introducing Protected fields.  I must agree with you, Duncan, that
I do like the way TP handles this.  Chalk up another point for
Turbo Pascal.  

I should add however, that my example may have been too simple for
the point I was trying to get across.  While actual data fields
should not be accessed by descendants, methods will be.  If I were
to declare a method in a ancestor that was implementation specific
that I did not want called directly, declaring that method as
private is actually too strict (in my previous understanding of
private w.r.t TP).  Hence, TP already provides a solution to this.
Unfortunately, I wasn't aware of it.  Thanks.

Ray Konopka
konopka@eagle.ibc.edu
From: dszego@srvtech (David Szego)
Newsgroups: comp.lang.pascal
Subject: UUCP Source In Pascal
Date: Sat, 03 Oct 92 23:55:49 EDT
Reply-To: dszego%srvtech@canrem.com (David Szego)
Organization: The Servants Of Technology Inc. (Toronto, Canada)

Does anyone have or know of source code to UUCP, UUCICO, etc.. in 
Pascal/Turbo Pascal? I'm trying to write a mail program of my own, but I 
don't have much more to work with than the necessary RFCs. I'm sure 
there's some code out there somewhere!

E-Mail any replies, if you'd be so kind.

Thanks a meg,
David Szego.
(DSzego%SrvTech@canrem.com)

Newsgroups: comp.lang.pascal
From: kjell@bel.e.kth.se (Kjell Rilbe)
Subject: Re: Turbo Pascal 7.0
Organization: Dept. of EE, Royal Institute of Technology, Stockholm, Sweden
Date: Fri, 2 Oct 1992 12:04:43 GMT

In article <UelrS6e00WBN86Resn@andrew.cmu.edu> Shelby Stewman <ss62+@andrew.cmu.edu> writes:
>[Stuff about IDE and other editor deleted]
>
>Wish list: [Some points deleted]
>
>* a way to have variables >64K
We all want this, don't we?
>
>* an easy TSR creation unit
Yes, here I want to add something. If you could specify in which order
the linker links the units, you could make it put the units &c that
you need in your TSR at low addresses, and put the initialization and star-up
code at high addresses. Then it would be much easier to free the memory
space that the start-up code takes. And perhaps, we could get some procedures
or such to move the heap to some space we have allocated somewhere, to make
it possible to use the heap in the TSR. And we would like to be able
to specify where global variables will be put, for the same reasons.

I know this might slow down linking and maybe compilation, so perhaps it
could be put in a separate linker program, dedicated to TSR:s.

I haven't given this a lot of thought, so feel free to comment!
>
>* the ability to produce those quick little .COM files (which Microsoft
>is      trying to make obsolete)
Support of all kinds of different memory models, like in TASM and TC!
>
>* the option of creating .OBJ instead of the .TPU files
A simple conversion utility! Wasn't there such a program for TP4 
TPU files?
>
>* printer .BGI files
Available at FTP-sites, so I've heard. But it would be nice if some
of them came with the TP-package. I would also like SVGA .BGI files!
>
>* more .CHR files
Yes! And put the editor in the TP package, please!

Just some thoughts! Comments?

/Kjell Rilbe
-- 
------------------------------------------------------------------------------
! Kjell Rilbe           ! (Phone rings...)                                   !
! kjell@elixir.e.kth.se ! "If that's Franklyn, tell him to boil his head.    !
!                       !                        ---Jimmy Blake in "Chancer" !
Newsgroups: comp.lang.pascal
Subject: Word Wrap
From: cole_d@kosmos.wcc.govt.nz
Date: 26 Sep 1992 10:16:09 GMT
Reply-To: cole_d@kosmos.wcc.govt.nz
Organization: Wellington City Council, Wgtn, NZ
NNTP-Posting-Host: kosmos.wcc.govt.nz

This will seem trivial compared to some of the questions asked here
but how when taking informatioon from the screen (in graphical or
text mode ) can you make a word wrapping function.  A simple one
is all that is needed that will move a word too large to the next 
line that's all, nothing fancy.

thanks in advance for the help
Newsgroups: comp.lang.pascal
From: keisu@sics.se (Torbj|rn Keisu)
Subject: Re: Turbo Pascal 7.0
Organization: Swedish Institute of Computer Science, Kista
	<10425@vice.ICO.TEK.COM> <1992Sep26.070731.20568@rulway.LeidenUniv.nl>
Date: Mon, 28 Sep 1992 06:49:48 GMT

In article <1992Sep26.070731.20568@rulway.LeidenUniv.nl> jeroenp@rulfc1.LeidenUniv.nl (Jeroen W. Pluimers) writes:

   In article <10425@vice.ICO.TEK.COM> bobb@vice.ICO.TEK.COM (Robert Beauchaine) writes:
>   >
>   >  In C++, your constructors/destructors *have* to be named the same
>   >  as your base class; i.e., for a class name "a", your constructor
>   >  would be "void a(optional arguments)", and your destructor would be 
>   >  "void ~a(optional arguments)".  If your descended class wishes to 
>   >  call either, there is no ambiguity.
   
>   Doesnt' this naming convention give problems when you want to give
>   one class more than one constructor or destructor?

No, since a C++ function is identified not only by name but with a combination of
name and arguments (a.k.a. namemangling).

So "int nisse(int kurt)" is different from "int nisse(double kurt)" this is very 
convenient and handled by the compiler.

-- I too think it would be nice to have multiple inheritance, but I understand
why they left it out in tp6.

/tk

Newsgroups: comp.lang.pascal
From: shadow@r-node.gts.org (Jay Chu)
Subject: Telegard 2.7 BBS programming
Organization: R-node Public Access UNIX Information System (416-249-5366)
Date: Sat, 26 Sep 1992 22:30:55 GMT

Can someone write me a TG27 program for altering flags globally in the entire
user.lst?
-- 
        ______                shadow@r-node.gts.org
       | |__| |   If it's there and you can see it       - it's real
       |  ()  |   If it's there and you can't see it     - it's transparent
       |______|   If it's not there and you can't see it - you erased it!
Newsgroups: comp.lang.pascal,alt.msdos.programmer,comp.os.msdos.programmer
From: hcbarth@afterlife.ncsc.mil (Bart Bartholomew)
Subject: Re: Hi() and Lo() functions?
Organization: The Great Beyond
Date: Wed, 30 Sep 1992 07:15:46 GMT

In article <JT.92Sep29134023@fizyk1.fuw.edu.pl> jt@fuw.edu.pl (Jerzy Tarasiuk) writes:
>>>>>> On 25 Sep 92 13:10:04 GMT, pigeons@JSP.UMontreal.CA (Pigeon Steven) said:
>Pigeon> Well... What about the DIV operator (integer division).
>Pigeon> Hi(bx) = BX div 256
>Pigeon> Most of languages implements a version of the DIV operator. If the target
>Pigeon> language doesnt: hi(bx) = trunc(bx/16)  (integer part of,).
>
>You are right to use DIV in Pascal (in most of other languages / is
>integer division if both operands are integer variables). But don't
>forget the sign problem in any langguage unless you use unsigned
>variables (e.g. if BX is $F123, BX div 256 is $FFF1, not $00F1).
>(of course can put result in byte-size variable and sign makes no
> difference unless range checking is turned on and try to put in
> UNSIGNED byte - can get run-time error in such a case)

	AAAArrrrrgh.  Don't use divides, or mods to get
power-of-2 remainders.  I don't know if it's PC in new
computerspeak, but a shift operator is much faster than
any other.  You want the upper 8 bits of a 16 bit int?
Just shift the sucker 8 to the right and take it.  If you
can't control the sign extension in your language, mask
off the lower 8.  upper = (int >> 8) & 0xff; and be done
with it.  If some brain-damaged supervisor doesn't understand
it, or if some fresh from school 'programmer' can't follow it,
put in a comment or two to help them.
	BartB
-- 
 If there's one thing I just can't stand, it's intolerance.
*No One* is responsible for my views, I'm a committee. Please do not
infer that which I do not imply.  hcbarth@afterlife.ncsc.mil
From: spoulsen@mcs213k.cs.umr.edu (Steven P Poulsen)
Newsgroups: comp.lang.pascal
Subject: Re: Anyone know...
Date: 28 Sep 92 15:02:20 GMT

Earlier, 'Ryan Snodgrass' wrote:
>
>
>I have three questions:

...

>2.	Anyone know how to turn the cursor off OTHER than placing it off
>	the text screen?  I want the cursor off, but still be able to use
>	GoToXY, etc.

...

>Source code is wanted, rather than just TPU units themselves.
>Thanks a million,
>
>Ryan Snodgrass
>

As for #2, look in Ralf Brown's interrupt list.  There is an interrupt to changethe cursor size.  Just set the firstline and lastline to the same number.

-- 
===========================================      ,--,
  Steven P. Poulsen <spoulsen@cs.umr.edu>      ,'  '--,
  Student of Electrical Engineering            ---, ,'
  University of Missouri - Rolla                ,','
===========================================    , '
From: C604441@mizzou1.missouri.edu ( Gary Jarrell)
Newsgroups: comp.lang.pascal
Subject: V 7.0?
Date: 5 Oct 92 04:49:18 GMT

Hi, I've been reading the notes on V7.0, and am wondering is it in the works no
w, or is it just being thought about by the users?  If it is in the works, do y
ou know a release date?  Gary Jarrell