🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: bit.listserv.simula
Article #464

Procedure redefinition

#464
From: rjp
Date: Mon, 13 Dec 1993 10:38
16 lines
1582 bytes
SIMULA prefixes all programs with the following (invisible) header:

external class basicio;
BASICIO(inlength, outlength) begin
inspect sysin do
inspect sysout do


This has the effect of making the standard files sysin and sysout the
default source for the names of outint, outfix, outimage etc. These
are predeclared names, not keywords, so you should be able to write
new procedures with the same names and these will be used instead. You
should place these procedures at the start of your program. I think it
will work.

Rob Pooley
Technical Details
Message-ID: <17089.9312131038@auskerry.dcs.ed.ac.uk>
Path: arc1-ca.pugleaf.net!gmd.de!xlink.net!howland.reston.ans.net!usenet.ins.cwru.edu!gatech!europa.eng.gtefsd.com!paladin.american.edu!auvm!DCS.EDINBURGH.AC.UK!rjp

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 113dd9,4d03a03e12031393
X-Google-Attributes: gid113dd9,public
X-Google-ArrivalTime: 1993-12-13 08:20:56 PST
Path: arc1-ca.pugleaf.net!gmd.de!xlink.net!howland.reston.ans.net!usenet.ins.cwru.edu!gatech!europa.eng.gtefsd.com!paladin.american.edu!auvm!DCS.EDINBURGH.AC.UK!rjp
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: bit.listserv.simula
Return-Path: <@AUVM.AMERICAN.EDU,@UGA.CC.UGA.EDU:owner-simula@UGA.CC.UGA.EDU>
Return-Path: <@UGA.CC.UGA.EDU,@BITNIC.EDUCOM.EDU:owner-simula@BITNIC.EDUCOM.EDU>
Return-Path: <@BITNIC.EDUCOM.EDU:owner-simula@VM.GMD.DE>
Return-Path: <rjp@DCS.EDINBURGH.AC.UK>
Via: uk.ac.edinburgh.dcs; Mon, 13 Dec 1993 10:40:47 +0000
Message-ID: <17089.9312131038@auskerry.dcs.ed.ac.uk>
Date: Mon, 13 Dec 1993 10:38:44 GMT
Sender: The SIMULA Language List <SIMULA@UGA.BITNET>
From: rjp@DCS.EDINBURGH.AC.UK
Subject: Procedure redefinition
In-Reply-To: <9312082118.aa28963@dcs.ed.ac.uk>
              (chris@mtdhp1.marintek.sintef.no)
Lines: 15