00:00:12
##forth
<cleobuline>
i have add USERNAME STRING variable :)
00:02:33
##forth
<cleobuline>
it should be nice to add SIZE-OF-PENIS STRING VAR more complex ...`
00:03:09
##forth
<cleobuline>
let user add himself ...
00:03:51
##forth
<xentrac>
what if he's a she?
00:04:08
##forth
<cleobuline>
yes they mays adapt
00:04:56
##forth
<cleobuline>
now the dictionnary is extensible xentrac no more fixed array of words
00:05:24
##forth
<cleobuline>
as long as there is memory it can grow xentrac
00:06:50
##forth
<cleobuline>
i'm planning to do a red-black tree version for fun
00:07:33
##forth
<cleobuline>
for fast recovery word code
00:08:18
##forth
<cleobuline>
FORGET will be slower yet
00:13:47
##forth
<cleobuline>
i'am happy with this result xentrac
00:14:05
##forth
<cleobuline>
until i find a new bug :)
00:54:09
##forth
<cleobuline>
mforth: FORGET HELLO
00:54:09
##forth
<mforth>
Forgot everything from 'HELLO' at index 61 (dict was 62, now 61; mem count now 1)
00:54:24
##forth
<cleobuline>
mforth: LOAD "test.fth"
00:54:24
##forth
<mforth>
Error: Word already defined
00:54:37
##forth
<cleobuline>
mforth: WORDS
00:54:37
##forth
<mforth>
USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP TEST-CASE DOUBLE FACT POW FIBONACCI COUNTDOWN TUCK SUM_SQUARE CUBE SUM_CUBES RECUNACCI CAT :D PGCD FPRIME? FPRIME2? SEED COUNT NUMS
00:54:57
##forth
<cleobuline>
mforth: HELLO
00:54:57
##forth
<mforth>
Hello cleobulineHow are uou ?
01:03:23
##forth
<cleobuline>
mforth: WORDS
01:03:23
##forth
<mforth>
USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP
01:03:50
##forth
<cleobuline>
mforth: LOAD "test.fth"
01:04:05
##forth
<cleobuline>
mforth: HELLO
01:04:06
##forth
<mforth>
Hello cleobuline How are uou ?
01:07:06
##forth
<cleobuline>
mforth: LOAD "test.fth"
01:07:10
##forth
<cleobuline>
mforth: HELLO
01:07:10
##forth
<mforth>
Hello cleobuline How are uou ?
14:30:55
##forth
<cleobuline>
mforth: HELLO
14:30:55
##forth
<mforth>
Hello cleobuline How are uou ?
15:32:43
##forth
<cleobuline>
mforth: HELLO
15:32:43
##forth
<mforth>
Hello cleobuline How are uou ?
16:39:03
##forth
<veltas>
Classic Forths would start by saying "HI", respond with "OK" or "<input>?" if they failed on some input, and you would say "BYE" to leave them
16:39:12
##forth
<veltas>
So quite conversational really
19:33:17
##forth
<cleobuline>
mforth: WORDS
19:33:17
##forth
<mforth>
USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP DOUBLE FACT POW FIBONACCI COUNTDOWN TUCK SUM_SQUARE CUBE SUM_CUBES RECUNACCI CAT :D PGCD FPRIME? FPRIME2? SEED COUNT NUMS STARS
22:13:22
##forth
<cleobuline>
mforth: LOAD "test.fth"
22:13:33
##forth
<cleobuline>
mforth: WORDS
22:13:34
##forth
<mforth>
USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP DOUBLE FACT POW FIBONACCI COUNTDOWN TUCK SUM_SQUARE CUBE SUM_CUBES RECUNACCI CAT :D PGCD FPRIME? FPRIME2? SEED COUNT NUMS STARS
22:13:41
##forth
<cleobuline>
mforth: QUIT
22:13:41
##forth
<mforth>
Environment for cleobuline has been freed.
22:13:49
##forth
<cleobuline>
perfect
22:13:54
##forth
<cleobuline>
mforth: WORDS
22:13:55
##forth
<mforth>
USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP
22:14:03
##forth
<cleobuline>
mforth: LOAD "test.fth"
22:14:27
##forth
<cleobuline>
mforth: HELLO
22:14:27
##forth
<mforth>
Hello cleobuline How are uou ?
22:14:36
##forth
<cleobuline>
mforth: MACRON
22:14:37
##forth
<mforth>
Macron est un saint homme !
22:14:59
##forth
<cleobuline>
mforth: CAT
22:14:59
##forth
<mforth>
/_/
23:54:12
##forth
<cleobuline>
mforth: 127 << 1 1 - PRIME?
23:54:12
##forth
<mforth>
Error: Stack underflow
23:54:44
##forth
<cleobuline>
mforth: 1 127 << 1 - PRIME?
23:54:51
##forth
<cleobuline>
mforth: .
23:54:51
##forth
<mforth>
1