00:00:00 --- log: started retro/10.05.03
00:10:30 --- quit: docl (Ping timeout: 245 seconds)
00:26:51 --- join: Chripher (~3e771332@gateway/web/freenode/x-udixhcmmnzgcpkyn) joined #retro
00:26:56 --- part: Chripher left #retro
08:23:55 --- join: virl (~virl__@chello062178085149.1.12.vie.surfer.at) joined #retro
08:26:00 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro
09:41:59 --- quit: docl (Ping timeout: 246 seconds)
12:39:31 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro
13:53:05 --- quit: docl (Ping timeout: 240 seconds)
14:55:22 --- quit: crc (Ping timeout: 264 seconds)
14:57:13 --- join: crc (~charlesch@184.77.185.20) joined #retro
15:14:00 <crc> it's good to be home again
15:57:16 --- quit: crc (Quit: http://retroforth.org)
16:13:32 --- join: crc (~charlesch@184.77.185.20) joined #retro
17:41:07 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro
17:41:22 <docl> howdy
17:45:05 <crc> hi docl 
17:45:33 <docl> hi crc
18:12:06 <crc> what's up?
18:30:22 <docl> not a lot. I've been playing with tables a bit.
18:32:18 <docl> I've been playing with them sort of aimlessly, perhaps I will put a spreadsheet style app together at some point.
18:32:38 <docl> http://retroforth.com/paste/?id=3374
18:44:25 <crc> looks good
19:11:18 <crc> I'm watching Bones and working on adding some documentation to the rx.fossil repo's wiki
19:23:24 --- quit: docl (Ping timeout: 240 seconds)
19:57:09 --- join: docl (~luke@216-161-87-126.ptld.qwest.net) joined #retro
19:58:12 <crc> wb
20:00:17 * docl just got back from chinese
20:00:33 <crc> cool. chinese is always a good treat.
20:01:14 <docl> yeah, my wife loves it :)
20:36:16 <docl> I like fossil. There's something comfortable about it.
20:47:29 <crc> it's sort of like darcs, but with more features and an easier workflow
20:50:38 <docl> what's similar to darcs specifically?
20:52:56 <crc> the workflow is similar to darcs and darcsweb
20:54:19 <crc> I do prefer the storage model of fossil; having everything in a portable sqlite database is sweet
20:54:41 <crc> and only having one binary to deal with is nice too :)
20:57:39 <docl> :)
20:58:11 <docl> I do like the built in web pages and wiki.
21:10:26 --- quit: crc (Ping timeout: 240 seconds)
21:12:33 --- join: crc (~charlesch@184.77.185.20) joined #retro
21:50:14 <docl> ( Variables and constants: 
21:50:14 <docl> ( row   col   -- used to navigate tables for reading or writing. 
21:50:14 <docl> ( rows  cols  -- used to generate a table. 
21:50:14 <docl> ( down  right -- the "direction" constants, used to link cells together. 
21:50:14 <docl> ( table       -- pointer to the table being focused on.
21:50:17 <docl> ( dir         -- which direction is being traversed at a given time.
21:50:19 <docl> ( size        -- how much space to allocate to cells, including values and links. )
21:50:22 <docl> : enum dup for r swap next for constant next ;
21:50:25 <docl> 6 elements   row col rows cols table dir
21:50:27 <docl> 3 enum       down right size
21:50:30 <docl> create saved 6 allot
21:50:32 <docl> : save row saved 6 copy ;
21:50:35 <docl> : load saved row 6 copy ;
21:50:38 <docl> : addr ( -a ) @cols @row * @col + size * @table + @dir + ;
21:50:40 <docl> : data ( -a ) addr @dir - ;
21:50:43 <docl> : set-right ( n- ) !row save 0 !col @cols for addr size + col ++ addr swap ! next load ;
21:50:46 <docl> : set-down  ( n- ) !col save 0 !row @rows for addr size + col ++ addr swap ! next load ;
21:50:49 <docl> : gen ( xy"- ) create 2dup , , here !table
21:50:51 <docl>   dup !row !rows dup !col !cols @addr heap !
21:50:54 <docl>   0 0 !col !row
21:50:56 <docl>   @cols for r set-down next
21:50:59 <docl>   @rows for r set-right next ;
21:51:01 <docl> : _emit dup 32 128 within if emit ;then drop 1- char: . emit ;
21:51:04 <docl> : .0 tib swap 0; nip ;
21:51:06 <docl> : type-padded .0
21:51:09 <docl>   8 for @+ _emit next char: | emit .s drop ;
21:51:11 <docl> : .output type-padded ;
21:51:14 <docl> : v
21:51:16 <docl>   save 0 !row 0 !col 0 !dir
21:51:19 <docl>   @rows for cr
21:51:22 <docl>   @cols for @addr .output next next load ;
21:51:24 <docl> 4 4 gen foo
21:51:27 <docl> v
21:51:29 <docl> oops
21:51:32 <docl> accidental paste
21:53:34 <docl> darn netbook mouse buttons
21:54:16 <crc> could be worse. at least you weren't booted for flooding :)
21:54:56 <docl> yeah. could have been pasted in a worse place :)
21:57:05 <docl> I wonder if I can turn the mouse buttons off. I use the touchpad itself most of the time anyway.
21:59:28 <docl> there we go, buttons disabled
22:05:50 --- quit: virl (Remote host closed the connection)
22:55:19 <docl> http://retroforth.com/paste/?id=3375
22:55:24 <docl> goodnight
23:44:47 --- quit: docl (Ping timeout: 246 seconds)
23:59:59 --- log: ended retro/10.05.03