00:00:00 --- log: started retro/10.08.29 00:58:52 --- quit: docl (Ping timeout: 240 seconds) 07:00:00 --- join: Shoggoth (~chatzilla@CPE-58-172-210-36.ewqo1.ken.bigpond.net.au) joined #retro 07:16:47 --- quit: Shoggoth (Quit: ChatZilla 0.9.86 [Firefox 3.5.5/20091124072228]) 08:27:58 --- join: docl (~luke@97-120-241-117.ptld.qwest.net) joined #retro 08:47:15 docl: http://rx-core.org/dev/parable.fossil/home 08:59:48 crc: is there any way to avoid the anonymous login in fossil? 09:00:05 having to solve captcha to see the fies is annoying 09:07:11 yiyus: should be fixed now 09:15:08 thanks :) thank you very much 09:15:15 no problem 09:34:47 * docl checks it out 09:39:42 what does setTopLevel do? 09:42:52 currently it's a helper for ^; lets you set the quote ^ returns to 09:46:35 is ^ some kind of exit function? 09:46:56 yes 09:54:49 ok, I see how it works now 10:25:02 this is likely to not be needed in the future; I'm looking into changing the threading model for quotes. 10:26:13 I can't seem to use "here" from parable. is there an equivalent? 10:30:11 there will be shortly 10:31:08 ok, pull from the repo now; the latest parable.x has HEAP and here added 10:51:29 compile is the same as comma, right? 10:54:36 I'm trying to write a string parsing word. I had it working in an earlier version of parable, but it was relying on retro syntax too much. 10:54:40 [ setTopLevel here swap [ getKey dup emit 2dup = [ 2drop #0 compile ^ ] [ compile ] if ] repeat ] 10:54:43 :str def 10:54:58 #32 str test 10:55:22 compile is the same as , 10:56:08 here is the older version: : str ( d-$ ) here swap repeat key 2dup =if 2drop 0 , ;then dup emit , again ; 11:31:25 if I want to break out of a loop, should I use ^ ? 11:31:42 currently there's no clean way to break out of a loop 11:32:02 ah, ok 11:32:06 control flow needs work :( 11:44:12 you could try something like: 11:44:13 :done? [ [ ,pop ,pop ,pop ,pop ,pop ,pop 2drop 2drop 2drop ] [ ] if ] def 11:44:14 :until [ [ ,dup ,push do ,pop ,swap done? ] repeat ] def 11:44:14 :str [ here swap [ getKey dup emit 2dup = [ 2drop #0 compile TRUE ] [ compile FALSE ] if ] until ] def 11:52:49 in toka, the control flow was simpler, since the low-level operations (if, loop, etc) used the machine stack, and provided a third stack for quote addresses 12:35:12 it works. but there needs to be a drop at the end of the done? true branch so it doesn't leave the quote on the stack. 12:36:29 ok 12:36:48 * crc is currently looking into implementing a toka-style threading model for parable 12:44:27 i always thought that a dedicated stack for block addresses would be a good idea, was it a problem in toka? 12:46:03 toka had a stack for code blocks, a data stack, a secondary data stack, and the actual address stack (used by the vm only; it wasn't directly exposed to code blocks) 12:47:55 and how did that work? was it a bad idea? 12:48:00 i've never used tok 12:48:01 a 12:48:05 it worked pretty well 12:49:16 i have this idea about a typed language with a different stack for each type (including blocks), but have never found the time to implement it 13:40:38 http://gist.github.com/556671 14:48:15 docl: looks good 14:48:42 http://gist.github.com/556729 is the start of the toka vm guts rewritten in retro 16:03:56 --- join: roarde (~sixforty@pdpc/supporter/active/sixforty) joined #retro 20:30:32 --- quit: docl (Ping timeout: 245 seconds) 20:38:10 --- join: docl (~luke@97-120-241-117.ptld.qwest.net) joined #retro 21:15:46 anyone had email spam problems that might be linked to being a domain admin in whois database? 21:36:28 --- quit: crc (Ping timeout: 265 seconds) 21:36:59 --- join: crc (~charlesch@184.77.185.20) joined #retro 22:42:49 http://gist.github.com/556671 22:47:53 anyone thought about rune lately? 23:05:25 --- quit: roarde (Quit: Leaving.) 23:17:44 --- join: roarde (~sixforty@pdpc/supporter/active/sixforty) joined #retro 23:59:59 --- log: ended retro/10.08.29