00:00:00 --- log: started forth/19.04.12 00:07:26 --- quit: Croran (Quit: No Ping reply in 180 seconds.) 00:08:40 --- join: Croran (~quassel@2601:601:1801:6dde:a024:a39a:633c:7ee8) joined #forth 01:29:43 --- join: dave0 (~dave0@108.060.dsl.syd.iprimus.net.au) joined #forth 01:30:10 hi 01:50:05 --- quit: gravicappa (Ping timeout: 264 seconds) 02:03:38 --- quit: ashirase (Ping timeout: 252 seconds) 02:08:10 --- join: ashirase (~ashirase@modemcable098.166-22-96.mc.videotron.ca) joined #forth 03:56:02 --- join: dddddd (~dddddd@unaffiliated/dddddd) joined #forth 04:12:07 proteusguy: yes, just streaming the text in/out; it should be adaptable for other things 04:48:55 --- quit: dave0 (Quit: dave's not here) 05:36:06 I had a syntax for that for mysql 05:37:21 &fp [ 'a 'b 'c ] 'table sql:insert 05:38:03 I'd wanted to use the | operator but that became the macro prefix 05:38:32 using the pipe for i/o words would've been funny 05:46:33 --- quit: djinni (Quit: Leaving) 05:47:30 --- join: djinni (~djinni@68.ip-149-56-14.net) joined #forth 05:52:41 http://forth.works/sql-test.forth.html shows some tests using the `sql:` words 06:17:01 --- quit: Zarutian (Read error: Connection reset by peer) 06:17:07 --- join: Zarutian_2 (~zarutian@173-133-17-89.fiber.hringdu.is) joined #forth 06:17:18 --- nick: Zarutian_2 -> Zarutian 06:40:50 --- join: mykespb (~myke@213.141.133.133) joined #forth 06:50:27 --- quit: Croran (Ping timeout: 268 seconds) 07:02:16 --- quit: mykespb (Quit: Leaving) 07:31:16 --- join: Croran (~quassel@2601:601:1801:6dde:a024:a39a:633c:7ee8) joined #forth 07:41:33 --- join: gravicappa (~gravicapp@h62-133-180-5.dyn.bashtel.ru) joined #forth 08:31:15 --- join: PoppaVic (~PoppaVic@unaffiliated/poppavic) joined #forth 08:48:06 --- quit: proteusguy (Ping timeout: 250 seconds) 08:52:37 --- join: proteusguy (~proteusgu@202.58.193.235) joined #forth 08:52:37 --- mode: ChanServ set +v proteusguy 09:08:04 --- quit: proteusguy (Ping timeout: 252 seconds) 09:27:05 --- join: proteusguy (~proteusgu@202.58.193.235) joined #forth 09:27:05 --- mode: ChanServ set +v proteusguy 09:30:12 --- quit: proteusguy (Excess Flood) 09:30:40 --- join: proteusguy (~proteusgu@202.58.193.235) joined #forth 09:30:40 --- mode: ChanServ set +v proteusguy 09:43:25 --- quit: proteusguy (Ping timeout: 252 seconds) 09:54:38 --- join: proteusguy (~proteusgu@202.58.193.235) joined #forth 09:54:38 --- mode: ChanServ set +v proteusguy 10:00:31 --- quit: proteusguy (Ping timeout: 255 seconds) 10:05:57 --- join: proteusguy (~proteusgu@202.58.193.235) joined #forth 10:05:57 --- mode: ChanServ set +v proteusguy 10:33:10 --- quit: djinni (Quit: Leaving) 10:36:48 --- join: djinni (~djinni@68.ip-149-56-14.net) joined #forth 11:01:12 --- quit: Zarutian (Ping timeout: 250 seconds) 11:02:37 --- join: Zarutian (~zarutian@173-133-17-89.fiber.hringdu.is) joined #forth 11:58:55 :me d:last compile:jump ; immediate 11:58:55 :dump (nnnn-) push push push c:put pop c:put pop c:put pop c:put ; 11:58:55 :delimited? (c-f) [ #32 eq? ] [ #10 eq? ] [ #13 eq? ] tri or or ; 11:58:55 :reader &delimited? parse-until s:evaluate ; 11:59:09 :me d:last compile:jump ; immediate 11:59:09 :dump (nnnn-) push push push c:put pop c:put pop c:put pop c:put ; 11:59:09 :delimited? (c-f) [ #32 eq? ] [ #10 eq? ] [ #13 eq? ] tri or or ; 11:59:09 :reader &delimited? parse-until s:evaluate ; 11:59:24 :asm (n-) reader dup n:zero? [ &dump dip ] if me ; 11:59:31 :me d:last compile:jump ; immediate 11:59:32 :dump (nnnn-) push push push c:put pop c:put pop c:put pop c:put ; 11:59:32 :delimited? (c-f) [ #32 eq? ] [ #10 eq? ] [ #13 eq? ] tri or or ; 11:59:32 :reader &delimited? parse-until s:evaluate ; 11:59:58 I hate irssi so much 12:00:06 very sorry for the spam guys 12:01:06 it was meant to be the core of a Nga assembler in 5 lines... now it's more like 15 :^))) 12:04:27 me me dump 12:05:21 http://ix.io/1G0v 12:07:20 since Nga is simple packed opcodes you just generate 32 bit words from your bytes 12:09:49 --- quit: gravicappa (Ping timeout: 240 seconds) 13:14:53 WilhelmVonWeiner: how do I test it? 13:27:45 pipe it the text "dup dup dup dup bye" heh 13:31:24 ok, displays dup! then AAAA 13:33:19 yeah it's just c:put-ing when the stack has 4 opcodes on it which I pipe into my vm 14:41:39 --- join: dave0 (~dave0@108.060.dsl.syd.iprimus.net.au) joined #forth 14:42:20 --- quit: dave0 (Read error: Connection reset by peer) 14:42:39 --- join: dave0 (~dave0@108.060.dsl.syd.iprimus.net.au) joined #forth 14:43:15 hi 16:00:17 --- quit: reepca (Ping timeout: 246 seconds) 16:30:16 --- quit: john_cephalopoda (Ping timeout: 252 seconds) 16:43:34 --- join: john_cephalopoda (~john@unaffiliated/john-cephalopoda/x-6407167) joined #forth 17:13:44 --- quit: dddddd (Remote host closed the connection) 19:37:21 --- join: rdrop-exit (~markwilli@112.201.166.63) joined #forth 19:44:05 Hello Forthites :) 20:13:45 hey guys 20:13:59 hi tabemann 20:29:44 I'm wondering if I should convert my code to using my quotation syntax 20:30:05 currently I have quotations implemented but I don't actually use them anywhere 20:32:24 like : foobar [: ." foo" ;] [: ." bar" ;] choose ; 20:48:09 I don't see the point 21:03:35 The only place I ever used them was in a Forth-like text macro language (sort of a RPN m4 alternative), it fit in naturally with macro expansion. 21:13:07 --- join: gravicappa (~gravicapp@h62-133-180-5.dyn.bashtel.ru) joined #forth 22:00:07 --- join: dddddd (~dddddd@unaffiliated/dddddd) joined #forth 22:24:28 --- quit: gravicappa (Ping timeout: 246 seconds) 22:39:10 --- quit: MrMobius (Read error: Connection reset by peer) 23:00:33 --- quit: jedb (Quit: Leaving) 23:54:35 --- join: MrMobius (~default@c-73-134-82-217.hsd1.va.comcast.net) joined #forth 23:59:59 --- log: ended forth/19.04.12