Groups > comp.lang.forth > #42102 > unrolled thread

Problem with GForth

Started by	lehs <skydda.barnen@gmail.com>
First post	2015-09-21 11:09 -0700
Last post	2015-10-09 00:30 -0700
Articles	20 on this page of 36 — 11 participants

Back to article view | Back to comp.lang.forth

  Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-09-21 11:09 -0700
    Re: Problem with GForth Bernd Paysan <bernd.paysan@gmx.de> - 2015-09-21 20:14 +0200
      Re: Problem with GForth "Elizabeth D. Rather" <erather@forth.com> - 2015-09-21 12:36 -1000
        Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-09-21 16:20 -0700
          Re: Problem with GForth Bernd Paysan <bernd.paysan@gmx.de> - 2015-09-22 02:37 +0200
            Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-09-21 22:59 -0700
            Re: Problem with GForth "Elizabeth D. Rather" <erather@forth.com> - 2015-09-21 20:04 -1000
      Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-09-21 16:17 -0700
        Re: Problem with GForth Bernd Paysan <bernd.paysan@gmx.de> - 2015-09-22 02:35 +0200
      Re: Problem with GForth hughaguilar96@gmail.com - 2015-09-21 23:30 -0700
      Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-07 18:33 -0700
        Re: Problem with GForth Paul Rubin <no.email@nospam.invalid> - 2015-10-07 19:03 -0700
        Re: Problem with GForth anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-10-08 07:45 +0000
          Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 05:06 -0700
            Re: Problem with GForth Howerd <howerdo@yahoo.co.uk> - 2015-10-08 14:24 -0700
              Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 22:49 -0700
                Re: Problem with GForth Paul Rubin <no.email@nospam.invalid> - 2015-10-08 23:11 -0700
            Re: Problem with GForth Coos Haak <chforth@hccnet.nl> - 2015-10-09 01:01 +0200
              Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 22:53 -0700
                Re: Problem with GForth Coos Haak <chforth@hccnet.nl> - 2015-10-09 10:04 +0200
                  Re: Problem with GForth Paul Rubin <no.email@nospam.invalid> - 2015-10-09 01:23 -0700
                    Re: Problem with GForth Coos Haak <chforth@hccnet.nl> - 2015-10-09 12:32 +0200
            Re: Problem with GForth "WJ" <w_a_x_man@yahoo.com> - 2015-10-08 23:34 +0000
              Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 22:55 -0700
            Re: Problem with GForth Paul Rubin <no.email@nospam.invalid> - 2015-10-08 16:52 -0700
              Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 23:03 -0700
              Re: Problem with GForth Coos Haak <chforth@hccnet.nl> - 2015-10-09 10:21 +0200
                Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-09 08:04 -0700
              Re: Problem with GForth anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2015-10-10 11:03 +0000
                Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-13 12:34 -0700
              Re: Problem with GForth Marcos Cruz <use_the_contact_page@programandala.net> - 2015-10-13 18:31 +0000
                Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-13 12:40 -0700
                  Re: Problem with GForth Marcos Cruz <use_the_contact_page@programandala.net> - 2015-10-14 20:20 +0000
            Re: Problem with GForth "WJ" <w_a_x_man@yahoo.com> - 2015-10-09 05:58 +0000
              Re: Problem with GForth lehs <skydda.barnen@gmail.com> - 2015-10-08 23:08 -0700
              Re: Problem with GForth mhx@iae.nl - 2015-10-09 00:30 -0700

Page 1 of 2 [1] 2 Next page →

#42102 — Problem with GForth

From	lehs <skydda.barnen@gmail.com>
Date	2015-09-21 11:09 -0700
Subject	Problem with GForth
Message-ID	<31b943ff-db41-4f89-9fb1-6f2fb823140c@googlegroups.com>

When trying this in GForth for Windows:

: U2/ 1 RSHIFT ;

: U/ 0 UM/MOD NIP ;

: SQRT \ m -- n
  DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
  DUP 1- >R U2/
  BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
  UNTIL RDROP ;

10 SQRT .

I got the error message:

:15: Floating-point unidentified fault
>>>sqrt<<<
Backtrace:

How come?

[toc] | [next] | [standalone]

#42104

From	Bernd Paysan <bernd.paysan@gmx.de>
Date	2015-09-21 20:14 +0200
Message-ID	<mtphbd$tmi$2@dont-email.me>
In reply to	#42102

lehs wrote:

> When trying this in GForth for Windows:
> 
> : U2/ 1 RSHIFT ;
> 
> : U/ 0 UM/MOD NIP ;
> 
> : SQRT \ m -- n
>   DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
>   DUP 1- >R U2/
>   BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
>   UNTIL RDROP ;
> 
> 10 SQRT .
> 
> I got the error message:
> 
> :15: Floating-point unidentified fault
>>>>sqrt<<<
> Backtrace:
> 
> How come?

0 UM/MOD

is a division by zero.  You probably want

0 SWAP UM/MOD

Unfortunately, division by zero is signalled as floating point error, and on 
Windows, the attempt to idenitfy which floating point error fails.

-- 
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/

[toc] | [prev] | [next] | [standalone]

#42108

From	"Elizabeth D. Rather" <erather@forth.com>
Date	2015-09-21 12:36 -1000
Message-ID	<CuadnelGjc3EG53LnZ2dnUU7-fudnZ2d@supernews.com>
In reply to	#42104

On 9/21/15 8:14 AM, Bernd Paysan wrote:
> lehs wrote:
>
>> When trying this in GForth for Windows:
>>
>> : U2/ 1 RSHIFT ;
>>
>> : U/ 0 UM/MOD NIP ;
>>
>> : SQRT \ m -- n
>>    DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
>>    DUP 1- >R U2/
>>    BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
>>    UNTIL RDROP ;
>>
>> 10 SQRT .
>>
>> I got the error message:
>>
>> :15: Floating-point unidentified fault
>>>>> sqrt<<<
>> Backtrace:
>>
>> How come?
>
> 0 UM/MOD
>
> is a division by zero.  You probably want
>
> 0 SWAP UM/MOD
>
> Unfortunately, division by zero is signalled as floating point error, and on
> Windows, the attempt to idenitfy which floating point error fails.

I know I'm always the one to nag about stack comments, but maybe if you 
had used them in U/ (and U2/) you'd have caught the error.

Cheers,
Elizabeth

-- 
==================================================
Elizabeth D. Rather   (US & Canada)   800-55-FORTH
FORTH Inc.                         +1 310.999.6784
5959 West Century Blvd. Suite 700
Los Angeles, CA 90045
http://www.forth.com

"Forth-based products and Services for real-time
applications since 1973."
==================================================

[toc] | [prev] | [next] | [standalone]

#42110

From	lehs <skydda.barnen@gmail.com>
Date	2015-09-21 16:20 -0700
Message-ID	<593eeff3-44f5-441c-ace4-d07a687263d1@googlegroups.com>
In reply to	#42108

Den tisdag 22 september 2015 kl. 00:36:11 UTC+2 skrev Elizabeth D. Rather:
> On 9/21/15 8:14 AM, Bernd Paysan wrote:
> > lehs wrote:
> >
> >> When trying this in GForth for Windows:
> >>
> >> : U2/ 1 RSHIFT ;
> >>
> >> : U/ 0 UM/MOD NIP ;
> >>
> >> : SQRT \ m -- n
> >>    DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
> >>    DUP 1- >R U2/
> >>    BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
> >>    UNTIL RDROP ;
> >>
> >> 10 SQRT .
> >>
> >> I got the error message:
> >>
> >> :15: Floating-point unidentified fault
> >>>>> sqrt<<<
> >> Backtrace:
> >>
> >> How come?
> >
> > 0 UM/MOD
> >
> > is a division by zero.  You probably want
> >
> > 0 SWAP UM/MOD
> >
> > Unfortunately, division by zero is signalled as floating point error, and on
> > Windows, the attempt to idenitfy which floating point error fails.
> 
> I know I'm always the one to nag about stack comments, but maybe if you 
> had used them in U/ (and U2/) you'd have caught the error.
> 
> Cheers,
> Elizabeth
> 
> -- 
> ==================================================
> Elizabeth D. Rather   (US & Canada)   800-55-FORTH
> FORTH Inc.                         +1 310.999.6784
> 5959 West Century Blvd. Suite 700
> Los Angeles, CA 90045
> http://www.forth.com
> 
> "Forth-based products and Services for real-time
> applications since 1973."
> ==================================================

Yes, I do some stupid errors and stack comments would keep track of some of them.

[toc] | [prev] | [next] | [standalone]

#42114

From	Bernd Paysan <bernd.paysan@gmx.de>
Date	2015-09-22 02:37 +0200
Message-ID	<mtq7nn$jlj$2@dont-email.me>
In reply to	#42110

lehs wrote:

> Yes, I do some stupid errors and stack comments would keep track of some
> of them.

BTW newbee mistakes: About all current Forths are case insensitive.  So you 
can write your code in lower case, which is much more readable.

-- 
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/

[toc] | [prev] | [next] | [standalone]

#42115

From	lehs <skydda.barnen@gmail.com>
Date	2015-09-21 22:59 -0700
Message-ID	<4f81257e-07ec-4be6-bba3-7c95328d29e9@googlegroups.com>
In reply to	#42114

Den tisdag 22 september 2015 kl. 02:37:01 UTC+2 skrev Bernd Paysan:
> lehs wrote:
> 
> > Yes, I do some stupid errors and stack comments would keep track of some
> > of them.
> 
> BTW newbee mistakes: About all current Forths are case insensitive.  So you 
> can write your code in lower case, which is much more readable.
> 
> -- 
> 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/

Den tisdag 22 september 2015 kl. 02:37:01 UTC+2 skrev Bernd Paysan:
> lehs wrote:
> 
> > Yes, I do some stupid errors and stack comments would keep track of some
> > of them.
> 
> BTW newbee mistakes: About all current Forths are case insensitive.  So you 
> can write your code in lower case, which is much more readable.
> 
> -- 
> 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/

Thanks for the tips with Google Play, because I really love it!

I'm not really a newbee, I just acts like a newbee. I even wrote an article in Forth Dimensions once: Fully interactive Fig-FORTH!

When coming back to forth after a long time I found  SP-Forth with a very fast optimizer. But know I have start to play with the rather fast GForth since it runs on both my equipments. And I might even start to use small letters.

[toc] | [prev] | [next] | [standalone]

#42116

From	"Elizabeth D. Rather" <erather@forth.com>
Date	2015-09-21 20:04 -1000
Message-ID	<_6-dnR5J5Yrtcp3LnZ2dnUU7-c2dnZ2d@supernews.com>
In reply to	#42114

On 9/21/15 2:37 PM, Bernd Paysan wrote:
> lehs wrote:
>
>> Yes, I do some stupid errors and stack comments would keep track of some
>> of them.
>
> BTW newbee mistakes: About all current Forths are case insensitive.  So you
> can write your code in lower case, which is much more readable.
>

It's customary to capitalize Forth words here, to recognize them as 
distinct from application or local system words, but most compilers no 
longer care.

Cheers,
Elizabeth

-- 
==================================================
Elizabeth D. Rather   (US & Canada)   800-55-FORTH
FORTH Inc.                         +1 310.999.6784
5959 West Century Blvd. Suite 700
Los Angeles, CA 90045
http://www.forth.com

"Forth-based products and Services for real-time
applications since 1973."
==================================================

[toc] | [prev] | [next] | [standalone]

#42109

From	lehs <skydda.barnen@gmail.com>
Date	2015-09-21 16:17 -0700
Message-ID	<aacbcc98-f4ef-4e08-b8d2-7b0de5e48f9f@googlegroups.com>
In reply to	#42104

Den måndag 21 september 2015 kl. 20:14:58 UTC+2 skrev Bernd Paysan:
> lehs wrote:
> 
> > When trying this in GForth for Windows:
> > 
> > : U2/ 1 RSHIFT ;
> > 
> > : U/ 0 UM/MOD NIP ;
> > 
> > : SQRT \ m -- n
> >   DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
> >   DUP 1- >R U2/
> >   BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
> >   UNTIL RDROP ;
> > 
> > 10 SQRT .
> > 
> > I got the error message:
> > 
> > :15: Floating-point unidentified fault
> >>>>sqrt<<<
> > Backtrace:
> > 
> > How come?
> 
> 0 UM/MOD
> 
> is a division by zero.  You probably want
> 
> 0 SWAP UM/MOD
> 
> Unfortunately, division by zero is signalled as floating point error, and on 
> Windows, the attempt to idenitfy which floating point error fails.
> 
> -- 
> 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/

I found the error but didn't erase the question fast enought... ;)

By the way, thanks for the GForth on Android! Unfortunately, I rated it wrong and don't know how to change it. :)

[toc] | [prev] | [next] | [standalone]

#42113

From	Bernd Paysan <bernd.paysan@gmx.de>
Date	2015-09-22 02:35 +0200
Message-ID	<mtq7kh$jlj$1@dont-email.me>
In reply to	#42109

lehs wrote:
> By the way, thanks for the GForth on Android! Unfortunately, I rated it
> wrong and don't know how to change it. :)

Google Play shows a "edit" on the right side of your comment (on top of all 
the other comments).  You can change the text and change the ratings by 
selecting the right number of stars.

-- 
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/

[toc] | [prev] | [next] | [standalone]

#42119

From	hughaguilar96@gmail.com
Date	2015-09-21 23:30 -0700
Message-ID	<13850533-2b99-4e66-a9ad-196d4b1aa4a7@googlegroups.com>
In reply to	#42104

On Monday, September 21, 2015 at 11:14:58 AM UTC-7, Bernd Paysan wrote:
> lehs wrote:
> 
> > When trying this in GForth for Windows:
> > 
> > : U2/ 1 RSHIFT ;
> > 
> > : U/ 0 UM/MOD NIP ;
> > 
> > : SQRT \ m -- n
> >   DUP 4 U< IF DUP IF DROP 1 THEN EXIT THEN
> >   DUP 1- >R U2/
> >   BEGIN R@ OVER U/ OVER + U2/ TUCK U> 0=
> >   UNTIL RDROP ;
> > 
> > 10 SQRT .
> > 
> > I got the error message:
> > 
> > :15: Floating-point unidentified fault
> >>>>sqrt<<<
> > Backtrace:
> > 
> > How come?
> 
> 0 UM/MOD
> 
> is a division by zero.  You probably want
> 
> 0 SWAP UM/MOD
> 
> Unfortunately, division by zero is signalled as floating point error, and on 
> Windows, the attempt to idenitfy which floating point error fails.

Here is a square root function:

: <dsqrt> ( Darg -- Uroot )           \ first estimate (Darg must be positive)
    d2/  1 >r  begin  2dup d0= not while
        d2/ d2/  r> 2* >r  repeat
    2drop  r> ;

: uaverage ( Ua Ub -- Umean )                       \ rounds down
    u>d  rot u>d  d+                                \ -- Dsum
    d2/ drop  ;                                     \ -- Usum/2             
\ the high word is always zero so we can drop it at the end

: dsqrt ( Darg -- Uroot )                           \ square root
    2dup d0< abort" *** DSQRT needs a positive argument ***"
    2dup d0= if  drop  exit then
    2dup <dsqrt>  begin  >r                         \ -- Darg    \r: -- estimate
        2dup  r@ um/mod nip                         \ -- Darg new-estimate
        r@ uaverage                                 \ -- Darg root
        dup r> - abs  2 < until                     \ -- Darg root
    nip nip ;

This is from the novice-package: http://www.forth.org/novice.html

As I recall, I had a bug in my DSQRT in the novice-package that is on the SVFIG website (the link above). This is a fixed version, but I haven't yet posted an upgrade to the novice-package on the SVFIG website.

[toc] | [prev] | [next] | [standalone]

#42440

From	lehs <skydda.barnen@gmail.com>
Date	2015-10-07 18:33 -0700
Message-ID	<b5e0c255-5ffc-416d-a269-d8edb4f9625b@googlegroups.com>
In reply to	#42104

Is it really that complicated to install 64-bit GForth? I just can't do it.
When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the cmd-files doesn't work...

[toc] | [prev] | [next] | [standalone]

#42441

From	Paul Rubin <no.email@nospam.invalid>
Date	2015-10-07 19:03 -0700
Message-ID	<87twq25d7b.fsf@jester.gateway.sonic.net>
In reply to	#42440

lehs <skydda.barnen@gmail.com> writes:
> Is it really that complicated to install 64-bit GForth? I just can't do it.
> When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the
> cmd-files doesn't work...

The .tar.gz is a source bundle so you have to compile it.  If you need a
Windows executable, the only one I see is:

http://www.complang.tuwien.ac.at/forth/gforth/gforth-0.7.0.exe

I think it may be 32 bit though.  I've run it and it works but I don't
know the cell size.

[toc] | [prev] | [next] | [standalone]

#42451

From	anton@mips.complang.tuwien.ac.at (Anton Ertl)
Date	2015-10-08 07:45 +0000
Message-ID	<2015Oct8.094515@mips.complang.tuwien.ac.at>
In reply to	#42440

lehs <skydda.barnen@gmail.com> writes:
>Is it really that complicated to install 64-bit GForth? I just can't do it.
>When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the cmd-files doesn't work...

A source package like gforth-0.7.3.tar.gz does not contain any
binaries.  If you want a 64-bit binary package for Windows, try
http://www.complang.tuwien.ac.at/forth/gforth/Snapshots/gforth64-0.7.9_20150825.exe

This is still pretty experimental.

- anton
-- 
M. Anton Ertl  http://www.complang.tuwien.ac.at/anton/home.html
comp.lang.forth FAQs: http://www.complang.tuwien.ac.at/forth/faq/toc.html
     New standard: http://www.forth200x.org/forth200x.html
   EuroForth 2015: http://www.rigwit.co.uk/EuroForth2015/

[toc] | [prev] | [next] | [standalone]

#42453

From	lehs <skydda.barnen@gmail.com>
Date	2015-10-08 05:06 -0700
Message-ID	<083ceee9-89a3-4600-8169-f4828f442a8f@googlegroups.com>
In reply to	#42451

Den torsdag 8 oktober 2015 kl. 09:50:36 UTC+2 skrev Anton Ertl:
> lehs <skydda.barnen@gmail.com> writes:
> >Is it really that complicated to install 64-bit GForth? I just can't do it.
> >When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the cmd-files doesn't work...
> 
> A source package like gforth-0.7.3.tar.gz does not contain any
> binaries.  If you want a 64-bit binary package for Windows, try
> http://www.complang.tuwien.ac.at/forth/gforth/Snapshots/gforth64-0.7.9_20150825.exe
> 
> This is still pretty experimental.
> 
> - anton
> -- 
> M. Anton Ertl  http://www.complang.tuwien.ac.at/anton/home.html
> comp.lang.forth FAQs: http://www.complang.tuwien.ac.at/forth/faq/toc.html
>      New standard: http://www.forth200x.org/forth200x.html
>    EuroForth 2015: http://www.rigwit.co.uk/EuroForth2015/

Thank you very much!

My BigInt now functions on:

32 bit SP-Forth on Vista and Windows 10 - 
32 bit GForth on Vista, Windows 10 and Android - 
32 bit SwiftForth on Vista and Windows 10 - 
32 bit Win32Forth on Vista and Windows 10 - 
64 bit GForth on Windows 10

https://github.com/Lehs/BIG-INTEGER-ANS-FORTH

The speed of 64 bit GForth seems to be equal to the highly optimized SP-Forth, at least for BigInt.

b 26359783991551070871965201979080333254038743646746158379582192038055842791146833506745978666309678710238746262325665407448047112858614221184120023774728850927701745782077979943165434355776993447809155163506304287949484786229043007193369097865681445643720004387345872800008950502312482268122160708155160328564
b 39327375191467048647521018841730348998598651522372708158670691892420060531890655533991461398550696324722351925617448324344083141484661951392820800479947685042791549748743564268081958080246132723174581232969062661990556972176861792341905425252382562697686127413259201904144867482279552760624394742040590855602
b 16306675630939784626502807161425612212340131109932460322238576590610976549235432503764166590338557086651302692446204937053886057954003032814801648230668894753863150108029570966337696939560565101312815273803547555619029325583815565767168841836143511237512006023630352590540140638620838094344583215840893265550
b**mod

takes a half second in both SP-Forth and GForth64 at Win 10.

[toc] | [prev] | [next] | [standalone]

#42465

From	Howerd <howerdo@yahoo.co.uk>
Date	2015-10-08 14:24 -0700
Message-ID	<ef574a20-4417-4a22-8cc9-5b79a6084ac0@googlegroups.com>
In reply to	#42453

On Thursday, October 8, 2015 at 1:06:15 PM UTC+1, lehs wrote:
> Den torsdag 8 oktober 2015 kl. 09:50:36 UTC+2 skrev Anton Ertl:
> > lehs <sky....rn...gmail.com> writes:
> > >Is it really that complicated to install 64-bit GForth? I just can't do it.
> > >When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the cmd-files doesn't work...
> > 
> > A source package like gforth-0.7.3.tar.gz does not contain any
> > binaries.  If you want a 64-bit binary package for Windows, try
> > http://www.complang.tuwien.ac.at/forth/gforth/Snapshots/gforth64-0.7.9_20150825.exe
> > 
> > This is still pretty experimental.
> > 
> > - anton
> > -- 
> > M. Anton Ertl  http://www.complang.tuwien.ac.at/anton/home.html
> > comp.lang.forth FAQs: http://www.complang.tuwien.ac.at/forth/faq/toc.html
> >      New standard: http://www.forth200x.org/forth200x.html
> >    EuroForth 2015: http://www.rigwit.co.uk/EuroForth2015/
> 
> Thank you very much!
> 
> My BigInt now functions on:
> 
> 32 bit SP-Forth on Vista and Windows 10 - 
> 32 bit GForth on Vista, Windows 10 and Android - 
> 32 bit SwiftForth on Vista and Windows 10 - 
> 32 bit Win32Forth on Vista and Windows 10 - 
> 64 bit GForth on Windows 10
> 
> https://github.com/Lehs/BIG-INTEGER-ANS-FORTH
> 
> The speed of 64 bit GForth seems to be equal to the highly optimized SP-Forth, at least for BigInt.
> 
> b 26359783991551070871965201979080333254038743646746158379582192038055842791146833506745978666309678710238746262325665407448047112858614221184120023774728850927701745782077979943165434355776993447809155163506304287949484786229043007193369097865681445643720004387345872800008950502312482268122160708155160328564
> b 39327375191467048647521018841730348998598651522372708158670691892420060531890655533991461398550696324722351925617448324344083141484661951392820800479947685042791549748743564268081958080246132723174581232969062661990556972176861792341905425252382562697686127413259201904144867482279552760624394742040590855602
> b 16306675630939784626502807161425612212340131109932460322238576590610976549235432503764166590338557086651302692446204937053886057954003032814801648230668894753863150108029570966337696939560565101312815273803547555619029325583815565767168841836143511237512006023630352590540140638620838094344583215840893265550
> b**mod
> 
> takes a half second in both SP-Forth and GForth64 at Win 10.

Hi Lehs,

Excellent work!
A useful collection of big maths functions :-)

Best regards,
Howerd

[toc] | [prev] | [next] | [standalone]

#42472

From	lehs <skydda.barnen@gmail.com>
Date	2015-10-08 22:49 -0700
Message-ID	<0d3157bd-251b-4b54-9ca3-cb68ee3353e4@googlegroups.com>
In reply to	#42465

Thank you! 
I'm rather satisfied with the forth style approach without garbage collection and so on. But I'm sure that a lot of words could be rewritten and improved.
And I'm dreaming of an adequate factoring routine like 'elliptic curves' or Pommerance's 'quadratic sieve'.

[toc] | [prev] | [next] | [standalone]

#42479

From	Paul Rubin <no.email@nospam.invalid>
Date	2015-10-08 23:11 -0700
Message-ID	<878u7c6078.fsf@jester.gateway.sonic.net>
In reply to	#42472

lehs <skydda.barnen@gmail.com> writes:
> I'm rather satisfied with the forth style approach without garbage
> collection and so on. But I'm sure that a lot of words could be
> rewritten and improved.

It's at a speed level now which is somewhat usable for interactive
public key crypto, but way too slow for (say) a TLS server.  It probably
wants a 10x speedup for that, which might or might not be feasible with
the current approach.  I do think it's doable one way or another with
gforth-fast or one of the native code compilers.

> And I'm dreaming of an adequate factoring routine like 'elliptic
> curves' or Pommerance's 'quadratic sieve'.

I tend to think that isn't too useful per se, since if you're trying to
factor numbers you probably care about the speed too much, but it would
be nice to implement elliptic curve arithmetic for cryptography.  

If you are just interested in how those factoring algorithms work, Neal
Koblitz's book "A Course in Number Theory and Cryptography" is pretty
readable, and Mike Scott's old MIRACL package (I think it is somewhere
on Github now) has some simple implementations in C or C++ that might be
worth looking at.

[toc] | [prev] | [next] | [standalone]

#42467

From	Coos Haak <chforth@hccnet.nl>
Date	2015-10-09 01:01 +0200
Message-ID	<m3cdut8vsjbj$.133uic0ov4ai$.dlg@40tude.net>
In reply to	#42453

Op Thu, 8 Oct 2015 05:06:12 -0700 (PDT) schreef lehs:

> Den torsdag 8 oktober 2015 kl. 09:50:36 UTC+2 skrev Anton Ertl:
>> lehs <skydda.barnen@gmail.com> writes:
>>>Is it really that complicated to install 64-bit GForth? I just can't do it.
>>>When packing up gforth-0.7.3.tar.gz I can't find any exe-files and the cmd-files doesn't work...
>> 
>> A source package like gforth-0.7.3.tar.gz does not contain any
>> binaries.  If you want a 64-bit binary package for Windows, try
>> http://www.complang.tuwien.ac.at/forth/gforth/Snapshots/gforth64-0.7.9_20150825.exe
>> 
>> This is still pretty experimental.
>> 
>> - anton
>> -- 
>> M. Anton Ertl  http://www.complang.tuwien.ac.at/anton/home.html
>> comp.lang.forth FAQs: http://www.complang.tuwien.ac.at/forth/faq/toc.html
>>      New standard: http://www.forth200x.org/forth200x.html
>>    EuroForth 2015: http://www.rigwit.co.uk/EuroForth2015/
> 
> Thank you very much!
> 
> My BigInt now functions on:
> 
> 32 bit SP-Forth on Vista and Windows 10 - 
> 32 bit GForth on Vista, Windows 10 and Android - 
> 32 bit SwiftForth on Vista and Windows 10 - 
> 32 bit Win32Forth on Vista and Windows 10 - 
> 64 bit GForth on Windows 10
> 
> https://github.com/Lehs/BIG-INTEGER-ANS-FORTH
> 
> The speed of 64 bit GForth seems to be equal to the highly optimized SP-Forth, at least for BigInt.
> 
> b 26359783991551070871965201979080333254038743646746158379582192038055842791146833506745978666309678710238746262325665407448047112858614221184120023774728850927701745782077979943165434355776993447809155163506304287949484786229043007193369097865681445643720004387345872800008950502312482268122160708155160328564
> b 39327375191467048647521018841730348998598651522372708158670691892420060531890655533991461398550696324722351925617448324344083141484661951392820800479947685042791549748743564268081958080246132723174581232969062661990556972176861792341905425252382562697686127413259201904144867482279552760624394742040590855602
> b 16306675630939784626502807161425612212340131109932460322238576590610976549235432503764166590338557086651302692446204937053886057954003032814801648230668894753863150108029570966337696939560565101312815273803547555619029325583815565767168841836143511237512006023630352590540140638620838094344583215840893265550
> b**mod
> 
> takes a half second in both SP-Forth and GForth64 at Win 10.

Added following with little effort:
32 bit Gforth on Linux
64 bit Gforth on Linux

groet Coos

[toc] | [prev] | [next] | [standalone]

#42473

From	lehs <skydda.barnen@gmail.com>
Date	2015-10-08 22:53 -0700
Message-ID	<1ed597bb-78ff-413e-906c-6ddc4bd5d614@googlegroups.com>
In reply to	#42467

Very nice! What efforts were made? I would like to make any correction for the purpose of conforming to ANS Forth.

[toc] | [prev] | [next] | [standalone]

#42484

From	Coos Haak <chforth@hccnet.nl>
Date	2015-10-09 10:04 +0200
Message-ID	<1hock0yg2ayhz.1l7pmy09llgm.dlg@40tude.net>
In reply to	#42473

Op Thu, 8 Oct 2015 22:53:26 -0700 (PDT) schreef lehs:

> Very nice! What efforts were made? I would like to make any correction for the purpose of conforming to ANS Forth.

I downloaded your BigIntANSForth.txt as raw text.
(I don't know git enough yet to use 'git fetch' or something.)
Stored the text of your message (the bignumbers) in bignum.txt
with 'b.' appended to see some more result.

  time gforth BigIntANSForth.txt bignum.txt -e bye

All Gforth 0.7.9_20150825:
Virtual Box 64 bit Ubuntu 14.4 about 0.75 seconds
Virtual Box 32 bit Ubuntu 14.4 about 1.5 seconds
Native Ubuntu 14.4 less than 0.5 seconds
Raspberry Pi B about 12 seconds.

groet Coos

[toc] | [prev] | [next] | [standalone]

Page 1 of 2 [1] 2 Next page →

csiph-web

Problem with GForth

Contents

#42102 — Problem with GForth

#42104

#42108

#42110

#42114

#42115

#42116

#42109

#42113

#42119

#42440

#42441

#42451

#42453

#42465

#42472

#42479

#42467

#42473

#42484