00:00:00 --- log: started retro/10.05.01 07:12:47 --- join: erider (~chatzilla@li125-93.members.linode.com) joined #retro 08:10:52 hi erider 08:12:16 hi docl whats up today 08:12:32 nothing much, I'm just making breakfast 08:15:27 I'm at work 08:15:43 slow, so I've been working on the rxcore repo 08:20:45 yeah I am going to eat myself 08:55:37 --- quit: crc (Ping timeout: 264 seconds) 08:55:42 * crcx is going to reimplement toka using rx 08:56:36 cool! 08:57:23 --- join: crc (~charlesch@184.77.185.20) joined #retro 09:07:00 crc how so 09:08:47 current toka is written in c; I'll rewrite the words from toka in retro 09:10:02 the only thing it won't have is dynamic memory allocation, and that's not a major loss for my purposes 09:10:24 I'll still be able to do the gc and quotes and such 09:17:16 --- quit: virl (Remote host closed the connection) 09:25:37 crcx I don't see any real issue with the current version of toka. unless you just want to have something to do 09:26:06 --- quit: erider (Changing host) 09:26:06 --- join: erider (~chatzilla@unaffiliated/erider) joined #retro 11:15:30 --- quit: docl (Read error: Connection reset by peer) 11:24:58 --- quit: erider (Ping timeout: 276 seconds) 11:25:43 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro 11:41:26 --- join: erider (~chatzilla@pool-173-69-156-197.bltmmd.fios.verizon.net) joined #retro 13:14:00 --- quit: erider (Ping timeout: 265 seconds) 13:17:59 : chomp ( $-$ ) dup dup getLength + 1- dup @ 32 =if 0 swap ! heap -- chomp else drop ;; then ; 13:18:02 : _ char: _ accept tib keepString chomp ; immediate 13:26:33 hmm, that chomp doesn't account for the new feature of keepString that compiles a jump to the ending. 13:29:30 : chomp ( $-$ ) dup dup getLength + 1- dup @ 32 =if 0 swap ! heap -- over 1+ -- chomp else drop ;; then ; 13:56:16 what is chomp? 13:58:28 erider (for the logs): current toka is unmaintained and thus subject to bitrot. 14:01:02 chomp takes spaces from the end of a string 14:01:14 so you can do e.g. _ Hello World _ 14:02:53 the keepstring related fix is incorrect though. this is better: 14:02:54 : chomp ( $-$ ) dup dup getLength + 1- dup @ 32 =if 0 swap ! heap -- dup 1- -- chomp else drop ;; then ; 14:04:27 ok 14:05:01 http://retroforth.com/paste/?id=3354 14:05:07 replace: else drop ;; then with: ;then drop 14:05:16 ok 14:05:34 no need for else in this case 14:07:03 : chomp ( $-$ ) dup dup getLength + 1- dup @ 32 =if 0 swap ! heap -- dup 1- -- chomp ;then drop ; 14:17:58 http://retroforth.com/paste/?id=3355 14:20:34 the extra exit helps "see" to know when to stop. 15:02:36 --- join: erider (~chatzilla@pool-173-69-156-197.bltmmd.fios.verizon.net) joined #retro 15:33:52 wb erider 15:40:06 [crcx/retroforth] bceb2b: use current rx core; adjust forthlets to work with... 15:41:07 [crcx/retroforth] 4de7dc: add chomp to data/strings 15:49:02 I'm thinking about moving retroforth itself into fossil 15:52:59 sounds good to me :) 16:13:12 --- join: virl (~virl__@chello062178085149.1.12.vie.surfer.at) joined #retro 16:13:47 hi virl 16:14:12 yo 16:14:38 how's it going? 16:22:39 ok, http://rx-core.org/dev/retroforth.fossil has retroforth code (10.5); I'll redo the changes involved in moving to rx-core as a base now 17:08:39 I added a simple captcha to the pastebin to hopefully reduce the spam postings 17:15:59 --- quit: docl (Ping timeout: 252 seconds) 18:31:33 --- quit: erider (Ping timeout: 265 seconds) 21:08:07 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro 21:08:13 welcome back 21:08:31 howdy 22:53:38 wow. prefixes for ! and @ make it a *lot* easier to avoid stack juggling. 23:59:59 --- log: ended retro/10.05.01