Menu
▾
▴
win32forth-cvs — CVS Commit List
You can subscribe to this list here.
| 2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(70) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2005 |
Jan
(38) |
Feb
(4) |
Mar
(11) |
Apr
(49) |
May
(81) |
Jun
(65) |
Jul
(36) |
Aug
(57) |
Sep
(63) |
Oct
(57) |
Nov
(49) |
Dec
(41) |
| 2006 |
Jan
(75) |
Feb
(80) |
Mar
(10) |
Apr
(13) |
May
(100) |
Jun
(100) |
Jul
(77) |
Aug
(87) |
Sep
(80) |
Oct
(124) |
Nov
(39) |
Dec
(41) |
| 2007 |
Jan
(20) |
Feb
(32) |
Mar
(32) |
Apr
(43) |
May
(146) |
Jun
(40) |
Jul
(49) |
Aug
(33) |
Sep
(25) |
Oct
(19) |
Nov
(11) |
Dec
(8) |
| 2008 |
Jan
(4) |
Feb
(11) |
Mar
(31) |
Apr
(40) |
May
(34) |
Jun
(24) |
Jul
(39) |
Aug
(104) |
Sep
(27) |
Oct
(35) |
Nov
(34) |
Dec
(97) |
| 2009 |
Jan
(75) |
Feb
(29) |
Mar
(45) |
Apr
(76) |
May
(121) |
Jun
(103) |
Jul
(67) |
Aug
(28) |
Sep
(22) |
Oct
(39) |
Nov
(9) |
Dec
(15) |
| 2010 |
Jan
(7) |
Feb
(39) |
Mar
(40) |
Apr
(57) |
May
(67) |
Jun
(69) |
Jul
(49) |
Aug
(68) |
Sep
(22) |
Oct
(7) |
Nov
(2) |
Dec
(10) |
| 2011 |
Jan
|
Feb
|
Mar
(10) |
Apr
(4) |
May
(6) |
Jun
(10) |
Jul
(16) |
Aug
(23) |
Sep
(9) |
Oct
|
Nov
(28) |
Dec
(3) |
| 2012 |
Jan
(11) |
Feb
(10) |
Mar
(1) |
Apr
|
May
(4) |
Jun
(3) |
Jul
(3) |
Aug
(4) |
Sep
(2) |
Oct
|
Nov
|
Dec
(1) |
| 2013 |
Jan
|
Feb
(7) |
Mar
(30) |
Apr
(4) |
May
(4) |
Jun
(8) |
Jul
(10) |
Aug
(4) |
Sep
|
Oct
(2) |
Nov
(24) |
Dec
(13) |
| 2014 |
Jan
(7) |
Feb
(2) |
Mar
|
Apr
(1) |
May
(9) |
Jun
|
Jul
(3) |
Aug
(9) |
Sep
|
Oct
(2) |
Nov
|
Dec
(3) |
| 2015 |
Jan
(4) |
Feb
(2) |
Mar
|
Apr
|
May
|
Jun
(1) |
Jul
|
Aug
(5) |
Sep
(1) |
Oct
(4) |
Nov
(7) |
Dec
(39) |
| 2016 |
Jan
(17) |
Feb
(2) |
Mar
(2) |
Apr
|
May
(1) |
Jun
(1) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(1) |
Dec
(2) |
| 2017 |
Jan
|
Feb
(3) |
Mar
|
Apr
|
May
(1) |
Jun
(2) |
Jul
|
Aug
(3) |
Sep
|
Oct
|
Nov
|
Dec
(2) |
| 2018 |
Jan
|
Feb
|
Mar
(2) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2019 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2022 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
(2) |
Nov
(1) |
Dec
(1) |
| 2023 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
|
Oct
(1) |
Nov
|
Dec
|
| 2025 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
(1) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|
From: George H. <geo...@us...> - 2008-06-28 20:40:36
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv13216 Modified Files: FLOAT.F Log Message: Minor doc changes Index: FLOAT.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/FLOAT.F,v retrieving revision 1.50 retrieving revision 1.51 diff -C2 -d -r1.50 -r1.51 *** FLOAT.F 15 May 2008 04:28:26 -0000 1.50 --- FLOAT.F 28 Jun 2008 20:40:31 -0000 1.51 *************** *** 1929,1933 **** float; ! : rep-normal ( addr u -- n true ; fs: r -- ) 1 max 2dup [char] 0 fill 18 umin fdup flog floor f>s 1+ dup>r over - --- 1929,1933 ---- float; ! : rep-normal ( addr u -- n true ; fs: r -- ) \ handle normal floats in REPRESENT. 1 max 2dup [char] 0 fill 18 umin fdup flog floor f>s 1+ dup>r over - *************** *** 1949,1953 **** \ ' rep-normal alias rep-denormal \ made a colon def - [cdo-2008May13] ! : rep-denormal \ synonym of REP-NORMAL rep-normal ; --- 1949,1954 ---- \ ' rep-normal alias rep-denormal \ made a colon def - [cdo-2008May13] ! : rep-denormal ( addr u -- n true ; fs: r -- ) \ handle denormal floats in REPRESENT ! \ (which is the same action as for normal floats). rep-normal ; |
|
From: George H. <geo...@us...> - 2008-06-28 20:35:11
|
Update of /cvsroot/win32forth/win32forth/src/tools In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv10958 Modified Files: dfc.F Log Message: Added IDE backups to old file. Added extra forth extensions. Index: dfc.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/tools/dfc.F,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** dfc.F 28 Jun 2008 14:05:24 -0000 1.4 --- dfc.F 28 Jun 2008 20:35:07 -0000 1.5 *************** *** 875,880 **** \ Extended with dialogs for Win32Forth ! FileOpenDialog OldFileName "Old or orginal file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|" ! FileOpenDialog NewFileName "The new file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|" external --- 875,880 ---- \ Extended with dialogs for Win32Forth ! FileOpenDialog OldFileName "Old or orginal file" "Forth Files (*.f,*.fs,*.4th,*.fth,*.seq)|*.f;*.fs;*.4th;*.fth;*.seq|IDE Backup Files (*.bak)|*.bak|All Files (*.*)|*.*" ! FileOpenDialog NewFileName "The new file" "Forth Files (*.f,*.fs,*.4th,*.fth,*.seq)|*.f;*.fs;*.4th;*.fth;*.seq|All Files (*.*)|*.*" external |
|
From: Jos v.d.V. <jo...@us...> - 2008-06-28 14:05:29
|
Update of /cvsroot/win32forth/win32forth/src/tools In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv22470 Modified Files: dfc.F Log Message: Jos: Restored the context. Index: dfc.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/tools/dfc.F,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** dfc.F 28 Jun 2008 13:03:46 -0000 1.3 --- dfc.F 28 Jun 2008 14:05:24 -0000 1.4 *************** *** 878,883 **** FileOpenDialog NewFileName "The new file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|" : .DfcFiles ( -- ) ! \ *G Asks for 2 files and show their differences in the console. conhndl start: OldFileName count dup 0= if ." No OLD file selected" quit --- 878,885 ---- FileOpenDialog NewFileName "The new file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|" + external + : .DfcFiles ( -- ) ! \ *G Ask for 2 files and show their differences in the console. conhndl start: OldFileName count dup 0= if ." No OLD file selected" quit *************** *** 892,899 **** \in-system-ok ' .DfcFiles is .Dfc \ link into w32f console menu - .DfcFiles ! in-system ! external \s --- 894,901 ---- \in-system-ok ' .DfcFiles is .Dfc \ link into w32f console menu ! .DfcFiles ! ! previous \s |
|
From: Jos v.d.V. <jo...@us...> - 2008-06-28 13:03:51
|
Update of /cvsroot/win32forth/win32forth/src/tools In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv29770 Modified Files: dfc.F tools.f Log Message: Jos: Adapted DFC for direct use in the menu tools in the Forth console. Index: dfc.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/tools/dfc.F,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** dfc.F 3 May 2005 15:05:54 -0000 1.2 --- dfc.F 28 Jun 2008 13:03:46 -0000 1.3 *************** *** 3,7 **** ANEW --DFC-- DECIMAL ! \ 2002-01-31 Replaced <spaces>( comment )<eol> \ with <spaces>\ comment<eol> \ 2002-01-30 Empty file now rejected. --- 3,10 ---- ANEW --DFC-- DECIMAL ! internal ! in-application ! ! \ 2002-01-31 Replaced <spaces>( comment )<eol> \ with <spaces>\ comment<eol> \ 2002-01-30 Empty file now rejected. *************** *** 830,834 **** PREVIOUS DEFINITIONS ! cr cr .( Example of use: ) cr cr --- 833,837 ---- PREVIOUS DEFINITIONS ! (( Command line use: cr cr .( Example of use: ) cr cr *************** *** 836,839 **** --- 839,843 ---- .( s" new-file-name" >newfile ) cr .( DFC ) cr cr + )) 0 [IF] ================================================================= *************** *** 869,873 **** [THEN] \\ End of Differential File Comparison - |
|
From: Jos v.d.V. <jo...@us...> - 2008-06-28 13:02:26
|
Update of /cvsroot/win32forth/win32forth/src/console In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv29316 Modified Files: ConsoleMenu.f Log Message: Jos: Added the File comparison utility to the menu. Index: ConsoleMenu.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/console/ConsoleMenu.f,v retrieving revision 1.12 retrieving revision 1.13 diff -C2 -d -r1.12 -r1.13 *** ConsoleMenu.f 16 Jun 2008 03:35:17 -0000 1.12 --- ConsoleMenu.f 28 Jun 2008 13:02:22 -0000 1.13 *************** *** 258,261 **** --- 258,262 ---- MENULINE "Cross &reference lister" "xref" MENULINE "&Dex - Document Extractor" "dexh" + MENULINE "D&fc - File comparison utility" ".Dfc" MENULINE "Dump Top-Level-&Windows" ".Windows" |
|
From: George H. <geo...@us...> - 2008-06-25 19:03:00
|
Update of /cvsroot/win32forth/win32forth/Help/hdb In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv517 Modified Files: HelpSrc.hdb HelpWrd.hdb HelpWrd.ndx HelpWrd.tv HelpWrd.txt Log Message: Rebuilt help database so defer@ finds correct version. Index: HelpSrc.hdb =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpSrc.hdb,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 Binary files /tmp/cvsji06X9 and /tmp/cvsawCvxD differ Index: HelpWrd.txt =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.txt,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** HelpWrd.txt 16 Jun 2008 03:25:40 -0000 1.2 --- HelpWrd.txt 25 Jun 2008 19:02:27 -0000 1.3 *************** *** 1428,1445 **** : _OPT-CODE ( -<name>- ) \ redefine to resolve code length in bytes - : (CONSOLETITLE) { \ $buff -- } - : .MEM-FREE ( -- ) - CREATE CONFIG$ - DEFER CONSOLETITLE - : HELLO { \ doing-app? -- } - \ startup stuff - : LOADUSERCONFIG ( -- ) - \ load user configuration file [...1558 lines suppressed...] - \ compile it - the sender is supposed to have - \ filled the clipboard with code (addr=len=0) - \ Sender : IDE (debugger) Receiver : Forth - \ ------------------------------------------- - CONSTANT WM_RSTKBP \ show Return stack (addr=len=0) - CONSTANT WM_SETBP \ tell the forth console to set a breakpoint on a word - \ ie: tell it to start debugging the word - \ addr siz : word name result =0 failed -1 success - CONSTANT WM_SHOWDEFER \ send DEFER name and expect that receiver will - \ display its current contents - \ addr siz = word - \ Sender : all Receiver : Forth - \ -------------------------------- - CONSTANT WM_STEPBP \ single step (addr=len=0) - CONSTANT WM_UNESTBP \ unnest to definition above (addr=len=0) - CONSTANT WM_WORDHELP \ ask help to display quickinfo for a word - \ addr siz = word (return 0 if not in database) RECORD: &PS \ The PAINTSTRUCT for Begin- and EndPaint \ It will be valid only when handling the WM_PAINT message --- 14447,14450 ---- Index: HelpWrd.hdb =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.hdb,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 Binary files /tmp/cvst2b2xI and /tmp/cvseW06mf differ Index: HelpWrd.tv =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.tv,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** HelpWrd.tv 16 Jun 2008 03:25:40 -0000 1.2 --- HelpWrd.tv 25 Jun 2008 19:02:27 -0000 1.3 *************** *** 1,8973 **** 0 tvn| Words| tvd| 0| ! 1 tvn| CLASSROOT| tvd| 5667| 2 tvn| -methods-| tvd| 0| ! -3 tvn| CLASSINIT:| tvd| 5668| ! -3 tvn| ~:| tvd| 5669| ! -3 tvn| ADDR:| tvd| 5670| ! -3 tvn| PRINT:| tvd| 5671| ! 2 tvn| OBJECT| tvd| 5672| 3 tvn| -methods-| tvd| 0| ! -4 tvn| GET:| tvd| 5673| [...29126 lines suppressed...] ! 2 tvn| NOTE| tvd| 4233| ! 2 tvn| NOTE| tvd| 4229| ! 2 tvn| NOWAY-POINTER| tvd| 3710| ! 2 tvn| NT?| tvd| 4052| ! 2 tvn| R>F| tvd| 3799| ! 2 tvn| REL>ABS| tvd| 5411| ! 2 tvn| SET-FONT| tvd| 3745| ! 2 tvn| SIZE-POINTER| tvd| 3707| ! 2 tvn| SP>COL| tvd| 4649| ! 2 tvn| SP>COL| tvd| 4225| ! 2 tvn| UPARROW-POINTER| tvd| 3708| ! 2 tvn| WAIT-POINTER| tvd| 3709| ! 2 tvn| WIN32S?| tvd| 4049| ! 2 tvn| WIN95?| tvd| 4051| ! 2 tvn| WIN98?| tvd| 4050| ! 2 tvn| WITH-IMG| tvd| 5077| ! 2 tvn| ZEXEC| tvd| 3523| ! 2 tvn| _PRINT-DIR-FILES| tvd| 5143| 1 tvn| Vocabularies| tvd| 0| 2 tvn| Application space| tvd| 0| Index: HelpWrd.ndx =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.ndx,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 Binary files /tmp/cvs2Vu11d and /tmp/cvsAfpmLl differ |
|
From: George H. <geo...@us...> - 2008-06-25 18:48:26
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv29344 Modified Files: ENVIRON.F Primutil.f Log Message: Commented out old DEFER@ and uncommented 200X version (the old version has been deprecated for 20 mnths; long enough IMO). Uncommented environment query. Index: Primutil.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/Primutil.f,v retrieving revision 1.25 retrieving revision 1.26 diff -C2 -d -r1.25 -r1.26 *** Primutil.f 16 Jun 2008 03:35:15 -0000 1.25 --- Primutil.f 25 Jun 2008 18:48:22 -0000 1.26 *************** *** 175,187 **** \ synonym defer@ action-of deprecated \ made a colon def - [cdo-2008May13] ! : defer@ \ synonym of action-of ! postpone action-of ; IMMEDIATE DEPRECATED in-application ! \ : defer@ ( xt1 -- xt2 ) \ 200X Core ext x:deferred \ *G xt1 is deffered word. xt2 is current setting. ! \ >body @ ; \ currently unsupported until old use fades out. : DEFER! ( xt2 xt1 -- ) \ 200X Core ext x:deferred --- 175,187 ---- \ synonym defer@ action-of deprecated \ made a colon def - [cdo-2008May13] ! \ : defer@ \ synonym of action-of ! \ postpone action-of ; IMMEDIATE DEPRECATED in-application ! : defer@ ( xt1 -- xt2 ) \ 200X Core ext x:deferred \ *G xt1 is deffered word. xt2 is current setting. ! >body @ ; : DEFER! ( xt2 xt1 -- ) \ 200X Core ext x:deferred Index: ENVIRON.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/ENVIRON.F,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** ENVIRON.F 19 Sep 2007 17:09:37 -0000 1.6 --- ENVIRON.F 25 Jun 2008 18:48:22 -0000 1.7 *************** *** 68,72 **** : X:DEFINED ; : X:REQUIRED ; ! \ : X:DEFERRED ; \ Not fully done yet \ : X:PARSE-NAME ; \ Not yet \ : X:EKEYS ; \ Not sure --- 68,72 ---- : X:DEFINED ; : X:REQUIRED ; ! : X:DEFERRED ; \ : X:PARSE-NAME ; \ Not yet \ : X:EKEYS ; \ Not sure |
|
From: Jos v.d.V. <jo...@us...> - 2008-06-21 18:41:52
|
Update of /cvsroot/win32forth/win32forth/src/lib/fmacro In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv11311 Modified Files: PROFILER.F Log Message: Jos: Adapted for the current version of the debugger and removed a bug. Index: PROFILER.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/lib/fmacro/PROFILER.F,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** PROFILER.F 21 Dec 2004 00:19:10 -0000 1.1 --- PROFILER.F 21 Jun 2008 14:38:02 -0000 1.2 *************** *** 73,77 **** : time-in-cycles ( - f ) #end #start f- ; ! : cycles>time ( - f ) 1e time-in-cycles cycle_time f* ; ' time-in-cycles is time_unit --- 73,77 ---- : time-in-cycles ( - f ) #end #start f- ; ! : cycles>time ( - f ) time-in-cycles cycle_time f* ; ' time-in-cycles is time_unit *************** *** 121,124 **** --- 121,127 ---- ; + : profile ( -<name>- ) \ Shows the elapsed time while profiling. + profiler ' adebug ; + previous *************** *** 132,136 **** init-debug-corr forget init-debug-corr ! \s Disable this line to see its use: \ : test 30 0 do noop drop loop ; --- 135,139 ---- init-debug-corr forget init-debug-corr ! \s Disable this line to see its use: \ : test 30 0 do noop drop loop ; *************** *** 138,144 **** ! ! profiler \ Change the output of the debugger ! debug test \ Aim the debugger at test cr .( Hit the C to start or the Q to stop ) cr test \ Run the test --- 141,145 ---- ! profile test \ Aim the debugger at test and change the output of the debugger cr .( Hit the C to start or the Q to stop ) cr test \ Run the test |
|
From: George H. <geo...@us...> - 2008-06-19 19:50:59
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv24724 Modified Files: POINTER.F Log Message: Added some documentaion (work in progress) Index: POINTER.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/POINTER.F,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** POINTER.F 5 Oct 2006 08:48:45 -0000 1.10 --- POINTER.F 19 Jun 2008 19:50:54 -0000 1.11 *************** *** 156,170 **** \ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ ! \ The dynamic string buffer is allocated when it is first used, and automatically ! \ released when the program terminates. ! 32768 constant max-dyn-string \ dynamic string space is this big (increased for tasks) ! max-dyn-string Pointer dyn-ptr \ the dynamic string buffer 0 value dyn-offset \ top of the dynamic string buffer ! : DynAlloc ( n1 -- a1 ) \ allocate space in dynamic buffer ! \ return a1 a buffer of n1 bytes dup max-dyn-string 16 / > \ limit one string to 1/16 of total --- 156,174 ---- \ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ ! \ *P The dynamic string buffer is allocated when it is first used, and automatically ! \ ** released when the program terminates. ! 32768 constant max-dyn-string ! \ *G Gives the size of the dynamic string buffer. ! \ Increased to 32768 for improved multi-tasking performance. ! max-dyn-string Pointer dyn-ptr ( -- addr ) ! \ *G Gives the address of the dynamic string buffer. 0 value dyn-offset \ top of the dynamic string buffer ! : DynAlloc ( n -- addr ) ! \ *G Allocate n bytes from the dynamic string buffer and return the address. If n exceeds 2048 then the size ! \ ** is limited to 2048 bytes. dup max-dyn-string 16 / > \ limit one string to 1/16 of total *************** *** 174,181 **** then dyn-ptr dyn-offset + swap +to dyn-offset (dynunlock) ; ! : _new$ ( -- a1 ) \ allocate the next MAXSTRING buffer MAXSTRING DynAlloc ; : init-new$ ( -- ) ['] _new$ is new$ ; --- 178,189 ---- then dyn-ptr dyn-offset + swap +to dyn-offset (dynunlock) ; ! : _new$ ( -- addr ) ! \ *G Allocate MAXSTRING bytes from the dynamic string buffer and return the address. Used as the normal action ! \ ** of NEW$ except during the early stages of initialisation, when NEW$ is a static buffer. MAXSTRING DynAlloc ; : init-new$ ( -- ) + \ *G Set new$ to perform _new$. This is performed as part of the initialisation chain, so is not normally + \ ** needed in an application. ['] _new$ is new$ ; |
|
From: G. <nro...@BA...> - 2008-06-19 17:36:07
|
Keep this new herbal supplement out of reach from your friends http://formula64.com/r.html |
|
From: G. <dsc...@10...> - 2008-06-19 16:03:32
|
DA rolls over on Britney foot-fault case http://marion-h.com/r.html |
|
From: Katina O. <blc...@bo...> - 2008-06-16 19:04:41
|
When your wife is angry with you at nights, dont loose hope to have good potence. Increase your xxx drive a lot whether you are male or female. Here! engplasser fabulously everbearer enduringly enterocoel eyewitness episcopize ermentrude eproviding epicanthus fLissecure engirdling |
|
From: Jarad <agn...@OC...> - 2008-06-11 15:08:07
|
Success rates at 88% for our organ enlargement wonder drugs http://www.mathelk.com/ |
|
From: Brook <st...@CE...> - 2008-06-11 07:57:53
|
Your love tool will be massive after this http://www.flimaezz.com/ |
|
From: Tricia B. <dx...@ci...> - 2008-06-06 18:59:02
|
Make your lady happy give her better nights of love. Life is pleasure with right antiEds Here! enfevering enetfilter ericophyte eopnotsupp fBrfpasswd esbbrdmin equivocado epileptoid episiocele euharmonic exposicion epiphanous |
|
From: bobbie <ssi...@AR...> - 2008-06-05 11:19:01
|
Christine used to refuse my dates, now she knocks on my door daily for a good round or two. http://www.dapoene.com/ |
|
From: George H. <geo...@us...> - 2008-05-30 22:46:44
|
Update of /cvsroot/win32forth/win32forth/apps/PictureViewer In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv16038 Modified Files: PictureViewer.f Log Message: Modified to use &of: for registry entries to allow relocation of ivars in window. Index: PictureViewer.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/apps/PictureViewer/PictureViewer.f,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** PictureViewer.f 27 Jul 2006 20:44:03 -0000 1.2 --- PictureViewer.f 30 May 2008 22:46:41 -0000 1.3 *************** *** 1048,1052 **** :M On_SysCommand: ( h m w l -- f ) \ determine whether Child is being Maximized or Restored ! over 0xFFF0 and dup SC_MAXIMIZE = IF true to ChildMaximizing THEN SC_RESTORE = IF true to ChildRestoring THEN --- 1048,1052 ---- :M On_SysCommand: ( h m w l -- f ) \ determine whether Child is being Maximized or Restored ! over 0xFFF0 and dup SC_MAXIMIZE = IF true to ChildMaximizing THEN SC_RESTORE = IF true to ChildRestoring THEN *************** *** 1251,1258 **** WindowSettings entries \ Address Length Default Value Reg Type Reg Value Name ! Frame 12 + ( 4 ) 514 REG_DWORD RegEntry "WindowWidth" ! Frame 16 + 434 REG_DWORD RegEntry "WindowHeight" ! Frame 20 + 135 REG_DWORD RegEntry "WindowLeft" ! Frame 24 + 66 REG_DWORD RegEntry "WindowTop" EndEntries --- 1251,1258 ---- WindowSettings entries \ Address Length Default Value Reg Type Reg Value Name ! &Of: Frame.Width ( 4 ) 514 REG_DWORD RegEntry "WindowWidth" ! &Of: Frame.Height 434 REG_DWORD RegEntry "WindowHeight" ! &Of: Frame.OriginX 135 REG_DWORD RegEntry "WindowLeft" ! &Of: Frame.OriginY 66 REG_DWORD RegEntry "WindowTop" EndEntries |
|
From: George H. <geo...@us...> - 2008-05-30 20:18:48
|
Update of /cvsroot/win32forth/win32forth/demos In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv21293 Modified Files: MultiHello.f Log Message: Added dialog message handling back in. Index: MultiHello.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/demos/MultiHello.f,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** MultiHello.f 26 Apr 2008 11:14:32 -0000 1.2 --- MultiHello.f 30 May 2008 20:18:44 -0000 1.3 *************** *** 115,118 **** --- 115,124 ---- ButtonControl TwoWindows + :M ClassInit: ( -- ) \ Added to handle dialog messages gah Friday, May 30 2008 + ClassInit: Super +DialogList ;M + + :M ~: ( -- ) \ Added to handle dialog messages gah Friday, May 30 2008 + -DialogList ~: Super ;M + :M StartSize: ( -- w h ) \ the screen origin of our window 170 120 ;M |
|
From: George H. <geo...@us...> - 2008-05-28 21:25:53
|
Update of /cvsroot/win32forth/win32forth/Help/html In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv5144 Modified Files: w32f-CVS.htm Log Message: gah: Minor corrections Index: w32f-CVS.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/html/w32f-CVS.htm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** w32f-CVS.htm 28 May 2008 04:01:08 -0000 1.1 --- w32f-CVS.htm 28 May 2008 21:25:35 -0000 1.2 *************** *** 9,13 **** <h1>CVS (Concurrent Versions System) use</span></h1> ! <p>This document is of interest only for the Win32Forth developpers.</p> --- 9,13 ---- <h1>CVS (Concurrent Versions System) use</span></h1> ! <p>This document is of interest only for the Win32Forth developers.</p> *************** *** 30,34 **** files.</p> ! <p>The Concurrent Versionning System used is named "Tortoise".</p> --- 30,35 ---- files.</p> ! <p>The preferred Concurrent Versions System Client used is named "TortoiseCVS" (though ! there are alternatives available).</p> *************** *** 52,56 **** <p>Once initial installation has been done, subsequent connexions are much simpler :</p> <ul> ! <li>Start your internet connexion</li> <li>Start pageant.exe. If no key is there, then give it your private key (not your public one !)</li> --- 53,57 ---- <p>Once initial installation has been done, subsequent connexions are much simpler :</p> <ul> ! <li>Start your internet connexion (if not a permanent connexion).</li> <li>Start pageant.exe. If no key is there, then give it your private key (not your public one !)</li> *************** *** 108,112 **** parts to be added. Run some old demos too, to check if everything is still ok.</p> ! <p>Before committing, Tortoise will ask you for a comment. Think to this comment before committing so that you can make it meaningful.</p> --- 109,113 ---- parts to be added. Run some old demos too, to check if everything is still ok.</p> ! <p>Before committing, Tortoise will ask you for a comment. Think about this comment before committing so that you can make it meaningful.</p> *************** *** 118,125 **** <h4>Conflicts</h4> ! <p>A conflict occurs when two different people committed the same line in the same file. Conflicts are usually rare but when they happen, the developpers themselves must resolve ! the conflict. Some tools are proposed to compare files but the simplest way to ! resolve conflict is probably to post messages on the Win32Forth Yahoo Group.</p> --- 119,128 ---- <h4>Conflicts</h4> ! <p>A conflict occurs when two or more different people have committed the same line, ! or contiguous lines in the same file. Conflicts are usually rare but when they happen, the developpers themselves must resolve ! the conflict. Some tools are proposed to compare and merge files but the simplest way to ! resolve conflict is probably to post messages on the Win32Forth Yahoo Group (unless the ! conflict is obvious).</p> |
|
From: jeromey <ia...@89...> - 2008-05-27 23:33:20
|
Studies have shown the 90% of women refuse to admit they would love a bigger tool on their guys. http://www.ncueiaog.com/ |
|
From: Sergei <Ser...@Ju...> - 2008-05-26 17:49:22
|
Guaranteed growth and results in just 1 month, herba1 pills that truly amaze http://www.riaetye.com/ |
|
From: Poitras <det...@3-...> - 2008-05-22 11:22:47
|
Bang her harder and longer, you can now with herbal express http://www.manusuxbig.com/ |
|
From: George H. <geo...@us...> - 2008-05-21 20:31:27
|
Update of /cvsroot/win32forth/win32forth/Help/html In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv20030 Modified Files: w32f-relnotes.6.14.htm Log Message: gah: added Camille to contributors Index: w32f-relnotes.6.14.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/Help/html/w32f-relnotes.6.14.htm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** w32f-relnotes.6.14.htm 15 May 2008 07:36:50 -0000 1.1 --- w32f-relnotes.6.14.htm 21 May 2008 20:31:21 -0000 1.2 *************** *** 16,19 **** --- 16,20 ---- <li>Dirk Busch</li> <li>Thomas Dixon</li> + <li>Camille Doiteau</li> <li>Brad Eckert</li> <li>Bruno Gauthier</li> |
|
From: bliefernich <tuo...@CA...> - 2008-05-21 14:38:56
|
Fulfill her desires and make her loyal to you forever http://www.libaerty.com/ |
|
From: karasivaci <emp...@MI...> - 2008-05-20 15:12:54
|
Girls like to suck large ones, so get huge with herbal express http://www.buuayrtoe.com/ |
1040 messages has been excluded from this view by a project administrator.
