🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.modula2
Article #2192

Re: Generic stack implementation

#2192
From: Ole-Bjorn Tuftedal
Date: Tue, 15 Dec 1992 11:47
23 lines
1218 bytes
911288c@ace.acadiau.ca (HON (EDWIN) KIN CHUNG) writes

>      FOR wordcount := 0 TO size DIV TSIZE(WORD) - 1 DO
>         item[wordcount] := location^;
>         INC(location, TSIZE(WORD));
                ^^^^^^
                parameter not correct type ??

                Is this some problem ...???
                I am using TopSpeed Modular-2.

                Can anybody help ??

The code was tested in Logitech Modula-2 (now Multiscope/StonyBrook).

The type ADDRESS (from module SYSTEM) is compatible with pointers - 
it is a POINTER TO WORD.

The (first) argument to INC can a.o. be integer, cardinal, address, 
char, an enumeration type.

Good luck,
Ole-Bjorn Tuftedal
Technical Details
Message-ID: <921215114732@pd200>
Path: arc1-ca.pugleaf.net!sparky!uunet!mcsun!sunic!ugle.unit.no!alf.uib.no!pd200!ob
References: <9212091316.AA14856@elg> <911288c.32.724187845@ace.acadiau.ca>

Show Full Headers
Complete Article Headers
Newsgroups: comp.lang.modula2
Path: arc1-ca.pugleaf.net!sparky!uunet!mcsun!sunic!ugle.unit.no!alf.uib.no!pd200!ob
From: ob@ifi.uib.no  (Ole-Bjorn Tuftedal)
Subject: Re: Generic stack implementation
Message-ID: <921215114732@pd200>
Nntp-Software: PC/TCP NNTP
Lines: 23        
Sender: usenet@alf.uib.no (Bergen University Newsaccount)
Reply-To: ob@ifi.uib.no
Organization: University of Bergen, Norway
References: <9212091316.AA14856@elg> <911288c.32.724187845@ace.acadiau.ca>
Date: Tue, 15 Dec 1992 11:47:32
Lines: 24