🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: rec.games.programmer
Article #177

Re: TP or C ? (was: Languages to program in and ports and blah and etc...)

#177
From: Harold Iuzzolino
Date: Fri, 24 Jul 1992 17:04
27 lines
1506 bytes
>>I still like Pascal.  Everybody says, "it was originally intended only to teach
>>people how to program".  And I say, "so what?"  C apparently wasn't "good
>>enough" in it's original incarnation either.  Otherwise, why did they have to
>>come up with ANSII C and C++?  And C does sacrifice readability in favor of
>>flexibility.  The C "for" statement is especially weird; it's completely
>>different from "for" statements I've seen in any other language.
>
[Pointer stuff deleted]
>
>Also, in C, I wanted to check a couple of bits at memory location 0400:0017.
>All I did was:
> 
>if(*((char *)0x04000017)&3) ...
>
>How would you do that in pascal? 

this is one way (there are others, as I can think of two more)

var blah:longint absolute $0400:$0017;

begin
 if blah=3 then InsertSpiffyProcedureNameHere; {Or whatever...}
end.

--Mark Iuzzolino	      | "What do you mean you found a way to store
   President, Ashgon Inc.     | memory in locations smaller than a bit?" --A 
   CEO, Fantasy Squared Inc.  | very confused teacher.
Technical Details
Message-ID: <!1hmlwg@lynx.unm.edu>
Path: arc1-ca.pugleaf.net!sparky!uunet!haven.umd.edu!darwin.sura.net!wupost!zaphod.mps.ohio-state.edu!sol.ctr.columbia.edu!The-Star.honeywell.com!umn.edu!lynx!carina.unm.edu!iuzzolin

Show Full Headers
Complete Article Headers
Newsgroups: rec.games.programmer
Path: arc1-ca.pugleaf.net!sparky!uunet!haven.umd.edu!darwin.sura.net!wupost!zaphod.mps.ohio-state.edu!sol.ctr.columbia.edu!The-Star.honeywell.com!umn.edu!lynx!carina.unm.edu!iuzzolin
From: iuzzolin@carina.unm.edu (Harold Iuzzolino)
Subject: Re: TP or C ? (was: Languages to program in and ports and blah and etc...)
Message-ID: <!1hmlwg@lynx.unm.edu>
Date: Fri, 24 Jul 92 17:04:30 GMT
Organization: Ashgon Inc.
Lines: 27