Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.forth > #40312

Re: local variable

From Bernd Paysan <bernd.paysan@gmx.de>
Newsgroups comp.lang.forth
Subject Re: local variable
Date 2015-07-05 15:28 +0200
Organization A noiseless patient Spider
Message-ID <mnbbaf$i4j$1@dont-email.me> (permalink)
References (6 earlier) <f21e179b-66fd-47ab-a91a-a8cbca64063e@googlegroups.com> <mnaig5$49c$1@dont-email.me> <8212e2d8-700b-4646-aadc-422da6cf2258@googlegroups.com> <mnatnf$43l$1@dont-email.me> <99b6063d-11ba-465b-b6b7-b142032aefe5@googlegroups.com>

Show all headers | View raw

Raimond Dragomir wrote:
> I don't know the Bernd's quotations or Hugh's. Maybe it's time to do
> some comparison between them? Some test cases like the above (but
> working). I would implement the cases in my system if possible also.
> It could be real instructive.

My quotations don't have access to the locals of the surrounding definition.  
They have access to the stack.  In fact, the quotations are just an unnamed 
definition in the middle of another definition.  The convention for higher 
order functions is that they call the quotation with full access to the 
stack underneath, so you can do things with that.

E.g. count the number of words in a wordlist with TRAVERSE-WORDLIST:

: count-words ( wid -- n )  0 [: drop 1+ true ;] rot traverse-wordlist ;

forth-wordlist count-words . 1933  ok

-- 
Bernd Paysan
"If you want it done right, you have to do it yourself"
net2o ID: kQusJzA;7*?t=uy@X}1GWr!+0qqp_Cn176t4(dQ*
http://bernd-paysan.de/

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

local variable grobibi <tristanhennequin@free.fr> - 2015-03-15 00:43 +0100
  Re: local variable "Elizabeth D. Rather" <erather@forth.com> - 2015-03-14 15:01 -1000
    Re: local variable grobibi <tristanhennequin@free.fr> - 2015-03-15 02:50 +0100
      Re: local variable Gerard Sontag <gerardsontag@gmail.com> - 2015-07-11 09:49 -0700
        Re: local variable Coos Haak <chforth@hccnet.nl> - 2015-07-11 22:50 +0200
          Re: local variable Gerard Sontag <gerardsontag@gmail.com> - 2015-07-12 01:03 -0700
            Re: local variable Coos Haak <chforth@hccnet.nl> - 2015-07-12 17:18 +0200
    Re: local variable albert@spenarnc.xs4all.nl (Albert van der Horst) - 2015-03-15 03:02 +0000
  Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-15 02:53 +0100
    Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-03-17 22:29 +0000
      Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2016-02-08 14:45 +0000
  Re: local variable hughaguilar96@gmail.com - 2015-03-14 20:45 -0700
    Re: local variable stephen@mpeforth.com (Stephen Pelc) - 2015-03-15 10:53 +0000
      Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-15 22:54 +0100
      Re: local variable hughaguilar96@gmail.com - 2015-03-15 19:45 -0700
        Re: local variable hughaguilar96@gmail.com - 2015-03-15 20:15 -0700
          Re: local variable grobibi <tristanhennequin@free.fr> - 2015-03-16 08:42 +0100
        Re: local variable stephen@mpeforth.com (Stephen Pelc) - 2015-03-16 07:51 +0000
          Re: local variable hughaguilar96@gmail.com - 2015-03-16 09:59 -0700
            Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-16 20:31 +0000
            Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-03-18 08:59 +0000
      Re: local variable "HAA" <someone@microsoft.com> - 2015-03-17 13:47 +1100
        Re: local variable stephen@mpeforth.com (Stephen Pelc) - 2015-03-17 10:59 +0000
          Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-17 18:55 +0100
            Re: local variable stephen@mpeforth.com (Stephen Pelc) - 2015-03-17 18:43 +0000
          Re: local variable "HAA" <someone@microsoft.com> - 2015-03-18 13:25 +1100
            Re: local variable "Elizabeth D. Rather" <erather@forth.com> - 2015-03-17 16:43 -1000
              Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-18 04:09 +0100
                Re: local variable "Elizabeth D. Rather" <erather@forth.com> - 2015-03-17 17:55 -1000
                Re: local variable "HAA" <someone@microsoft.com> - 2015-03-20 22:28 +1100
                Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-20 15:43 +0100
                Identifying self interest (was Re: local variable) "Alex McDonald" <blog@rivadpm.com> - 2015-03-20 15:20 +0000
            Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-03-18 08:48 +0000
              Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-09-16 18:55 +0000
                Re: local variable hughaguilar96@gmail.com - 2015-09-16 22:03 -0700
        Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-17 14:18 +0000
          Re: local variable albert@spenarnc.xs4all.nl (Albert van der Horst) - 2015-03-17 16:24 +0000
            Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-17 16:34 +0000
            Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-18 14:32 +0000
          Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-17 20:08 +0100
            Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-18 15:21 +0000
  Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-16 15:36 +0000
    Re: local variable hughaguilar96@gmail.com - 2015-03-16 10:09 -0700
      Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-16 20:24 +0000
        Re: local variable "Rod Pemberton" <buzz@notnotnontnooatno.cmm> - 2015-03-16 19:00 -0400
          Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-17 12:06 +0000
            Re: local variable stephen@mpeforth.com (Stephen Pelc) - 2015-03-17 14:37 +0000
            Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-17 18:58 +0100
          Re: local variable Doug Hoffman <glidedog@gmail.com> - 2015-03-17 08:55 -0400
          Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-17 14:15 +0000
      Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-17 16:54 +0000
        Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-17 17:45 +0000
          Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-17 20:14 +0100
          Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-03-20 15:06 +0000
            Re: local variable hughaguilar96@gmail.com - 2015-03-20 16:14 -0700
              Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-03-21 09:47 +0000
            Re: local variable hughaguilar96@gmail.com - 2015-07-04 19:52 -0700
              Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-05 07:24 +0100
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 02:04 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-05 10:36 +0100
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 03:25 -0700
                Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-07-05 15:28 +0200
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 08:11 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 08:21 -0700
                Re: local variable Bernd Paysan <bernd.paysan@gmx.de> - 2015-07-05 23:53 +0200
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 20:31 -0700
                Re: local variable hughaguilar96@gmail.com - 2015-07-05 19:56 -0700
                Re: local variable hughaguilar96@gmail.com - 2015-07-05 19:57 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-06 08:09 +0100
                Re: local variable hughaguilar96@gmail.com - 2015-07-06 19:59 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-07 08:30 +0100
                Re: local variable Michael Barry <barrym95838@yahoo.com> - 2015-07-10 00:35 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-10 01:41 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-10 13:55 +0100
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-10 07:13 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-10 16:29 +0100
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-10 08:57 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-10 17:48 +0100
                Re: local variable Paul Rubin <no.email@nospam.invalid> - 2015-07-10 10:02 -0700
                Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-09-16 17:30 +0000
                Re: local variable Mark Wills <markwills1970@gmail.com> - 2015-07-10 10:28 -0700
                Re: local variable "Elizabeth D. Rather" <erather@forth.com> - 2015-07-10 08:00 -1000
                Re: local variable hughaguilar96@gmail.com - 2015-07-10 21:31 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-10 19:13 +0100
                Re: local variable "Elizabeth D. Rather" <erather@forth.com> - 2015-07-10 09:06 -1000
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-11 14:10 +0000
                Re: local variable humptydumpty <ouatubi@gmail.com> - 2015-07-11 10:14 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-12 15:56 +0000
                Re: local variable humptydumpty <ouatubi@gmail.com> - 2015-07-12 11:48 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-10 21:21 -0700
                Re: local variable hughaguilar96@gmail.com - 2015-07-10 21:56 -0700
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-11 23:51 +0100
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-11 13:42 +0000
                Re: local variable franck.bensusan@gmail.com - 2015-07-12 02:17 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-12 15:12 +0000
                Re: local variable franck.bensusan@gmail.com - 2015-07-13 02:37 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-13 16:13 +0000
                Re: local variable franck.bensusan@gmail.com - 2015-07-13 14:48 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-14 06:41 +0000
                Re: local variable franck.bensusan@gmail.com - 2015-07-14 01:44 -0700
                Re: local variable Bernd Linsel <bl1@gmx.com> - 2015-07-11 11:03 +0200
                Re: local variable Bernd Linsel <bl1@gmx.com> - 2015-07-11 11:11 +0200
                Re: local variable hughaguilar96@gmail.com - 2015-07-12 16:43 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-11 15:14 +0000
                Re: local variable Julian Fondren <julian.fondren@gmail.com> - 2015-07-11 17:57 -0700
                Re: local variable anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-07-12 15:32 +0000
                Re: local variable "Alex McDonald" <blog@rivadpm.com> - 2015-07-10 13:13 +0100
                Re: local variable hughaguilar96@gmail.com - 2015-07-10 21:48 -0700
                Re: local variable franck.bensusan@gmail.com - 2015-07-05 03:47 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 04:15 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 04:27 -0700
                Re: local variable Raimond Dragomir <raimond.dragomir@gmail.com> - 2015-07-05 04:39 -0700
                Re: local variable franck.bensusan@gmail.com - 2015-07-05 07:08 -0700
  Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2015-03-18 05:04 +0000
    Re: local variable "WJ" <w_a_x_man@yahoo.com> - 2016-02-08 16:09 +0000
  Ignore the standard Stefan Mauerhofer <smauerhofer@androsoft.ch> - 2015-03-18 04:09 -0700
    Re: Ignore the standard Doug Hoffman <glidedog@gmail.com> - 2015-03-18 07:26 -0400
      Re: Ignore the standard "WJ" <w_a_x_man@yahoo.com> - 2015-03-20 17:31 +0000
        Re: Ignore the standard Doug Hoffman <glidedog@gmail.com> - 2015-03-20 17:41 -0400
          Re: Ignore the standard "Elizabeth D. Rather" <erather@forth.com> - 2015-03-20 14:26 -1000
            Re: Ignore the standard Doug Hoffman <glidedog@gmail.com> - 2015-03-21 06:00 -0400
              Re: Ignore the standard hughaguilar96@gmail.com - 2015-03-21 15:11 -0700
          Re: Ignore the standard Bernd Paysan <bernd.paysan@gmx.de> - 2015-03-21 02:49 +0100
            Re: Ignore the standard Doug Hoffman <glidedog@gmail.com> - 2015-03-21 06:04 -0400
    Re: Ignore the standard "Alex McDonald" <blog@rivadpm.com> - 2015-03-18 16:05 +0000
    Re: Ignore the standard "WJ" <w_a_x_man@yahoo.com> - 2015-03-20 17:13 +0000
  Re: local variable foxaudioresearch@gmail.com - 2015-07-05 08:44 -0700

csiph-web