Re: OOP packages

Path	csiph.com!newsfeed.hal-mli.net!feeder3.hal-mli.net!newsfeed.hal-mli.net!feeder1.hal-mli.net!ecngs!feeder.ecngs.de!xlned.com!feeder7.xlned.com!news2.euro.net!postnews2.euro.net!news.wanadoo.nl!not-for-mail
From	mhx@iae.nl (Marcel Hendrix)
Subject	Re: OOP packages
Newsgroups	comp.lang.forth
Message-ID	<63661588988435@frunobulax.edu> (permalink)
Date	Tue, 15 May 2012 20:37:40 +0200
References	<4fb24d7b$0$295$14726298@news.sunsite.dk>
X-Newsreader	iForth 2.0 console (October 21, 2006)
Lines	24
Organization	Wanadoo
NNTP-Posting-Date	15 May 2012 18:37:28 GMT
NNTP-Posting-Host	s529d937f.adsl.wanadoo.nl
X-Trace	1337107048 dr7.euro.net 223 82.157.147.127:58172
X-Complaints-To	abuse@wanadoo.nl
Xref	csiph.com comp.lang.forth:12194

Show key headers only | View raw

Doug Hoffman <glidedog@gmail.com> writes Re: OOP packages

> On 5/10/12 8:04 PM, hwfwguy@gmail.com wrote:
[..]

> ~40 lines or less? (compiles to 1652 bytes on Carbon MacForth)

FORTH> include class.frt
5
55
19200624 5 19200632 0 19200640 0
0  ok
[9]FORTH> .s
  Data: 5 55 16864328 5 16864332 0 16864336 0 0 ---
System: ---
 Float: --- ok

I think this is correct, but why does the stack have copies
of each printed number?

(I could not fix the source myself in a reasonable amount of time).

-marcel

Thread

OOP packages hwfwguy@gmail.com - 2012-05-08 09:31 -0700
  Re: OOP packages "Elizabeth D. Rather" <erather@forth.com> - 2012-05-08 09:10 -1000
    Re: OOP packages stephenXXX@mpeforth.com (Stephen Pelc) - 2012-05-08 20:17 +0000
      Re: OOP packages hwfwguy@gmail.com - 2012-05-08 18:26 -0700
      Re: OOP packages anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2012-05-09 11:34 +0000
        Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-09 08:00 -0400
          Re: OOP packages Bernd Paysan <bernd.paysan@gmx.de> - 2012-05-09 19:49 +0200
          Re: OOP packages anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2012-05-10 11:39 +0000
            Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-10 12:48 -0400
          Re: OOP packages Hugh Aguilar <hughaguilar96@yahoo.com> - 2012-05-10 02:26 -0700
  Re: OOP packages BruceMcF <agila61@netscape.net> - 2012-05-08 12:39 -0700
  Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-08 15:56 -0400
  Re: OOP packages hwfwguy@gmail.com - 2012-05-10 17:04 -0700
    Re: OOP packages Hugh Aguilar <hughaguilar96@yahoo.com> - 2012-05-11 02:02 -0700
    Re: OOP packages Albert van der Horst <albert@spenarnc.xs4all.nl> - 2012-05-15 10:32 +0000
    Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-15 08:35 -0400
      Re: OOP packages mhx@iae.nl (Marcel Hendrix) - 2012-05-15 20:37 +0200
        Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-15 15:22 -0400
        Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-15 21:50 -0400
          Re: OOP packages mhx@iae.nl (Marcel Hendrix) - 2012-05-17 08:11 +0200
            Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-17 08:55 -0400
              Re: OOP packages Gerry Jackson <gerry@jackson9000.fsnet.co.uk> - 2012-05-22 08:39 +0100
                Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-22 07:02 -0400
                Re: OOP packages Gerry Jackson <gerry@jackson9000.fsnet.co.uk> - 2012-05-22 13:14 +0100
                Re: OOP packages Coos Haak <chforth@hccnet.nl> - 2012-05-22 18:11 +0200
                Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-22 14:23 -0400
                Re: OOP packages Coos Haak <chforth@hccnet.nl> - 2012-05-23 19:47 +0200
                Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-23 14:58 -0400
                Re: OOP packages Doug Hoffman <glidedog@gmail.com> - 2012-05-31 07:43 -0400
            Re: OOP packages "Peter Knaggs" <pjk@bcs.org.uk> - 2012-05-17 19:31 +0100
              Re: OOP packages Hugh Aguilar <hughaguilar96@yahoo.com> - 2012-05-17 21:59 -0700
                Re: OOP packages digital.wilderness@googlemail.com - 2012-05-18 01:51 -0700

csiph-web