00:00:00 --- log: started forth/10.01.29 00:08:31 Is it possible to get the xt of a word directly outside of a definition? For example: word1 word2, where word1 executes word2? (Not during run-time) 00:39:07 --- join: cataska (n=cataska@210.64.6.235) joined #forth 00:45:37 --- quit: segher ("This computer has gone to sleep") 00:49:00 --- quit: PoppaVic ("Reality, what a concept!") 01:01:27 --- join: madwork_ (n=madgarde@204.138.110.15) joined #forth 01:02:18 --- quit: madwork (Read error: 104 (Connection reset by peer)) 01:08:52 --- join: GeDaMo (n=gedamo@dyn-62-56-89-110.dslaccess.co.uk) joined #forth 01:22:50 --- join: ASau` (n=user@77.246.230.183) joined #forth 01:54:32 --- quit: proteusguy_ (Client Quit) 01:54:50 --- join: proteusguy (n=proteusg@zeppelin.proteus-tech.com) joined #forth 02:15:58 --- quit: nighty__ (Client Quit) 02:54:14 --- join: DrunkTomato (n=DEDULO@ext-gw.wellcom.tomsk.ru) joined #forth 03:03:48 --- quit: cataska ("leaving") 03:06:43 jabb: use ' 03:06:49 : word1 ' execute ; 03:06:52 word1 word2 03:35:32 --- join: TR2N` (i=email@89.180.216.204) joined #forth 03:37:50 --- nick: TR2N` -> TR2N 03:48:36 --- join: ubuntu-nathan (n=Nathan@200.142.160.182) joined #forth 04:13:19 --- quit: GeDaMo ("Leaving.") 04:46:13 --- join: proteusguy_ (n=proteusg@zeppelin.proteus-tech.com) joined #forth 04:46:21 --- quit: proteusguy (Read error: 110 (Connection timed out)) 04:49:15 hello 04:51:37 Afternoon. 05:14:30 --- quit: Al2O3 (Read error: 110 (Connection timed out)) 05:22:14 --- quit: proteusguy_ (Client Quit) 05:22:27 --- join: proteusguy (n=proteusg@zeppelin.proteus-tech.com) joined #forth 05:37:46 --- join: crcx (i=d8012b82@gateway/web/freenode/x-zdifxtrvjjyqxyem) joined #forth 06:15:01 --- join: nighty__ (n=nighty@x122091.ppp.asahi-net.or.jp) joined #forth 06:17:10 --- quit: nighty__ (Client Quit) 06:27:49 --- join: Zarutian (n=zarutian@194-144-84-110.du.xdsl.is) joined #forth 06:33:32 --- join: luptenschteiner (n=User@unaffiliated/probonono) joined #forth 06:34:22 --- quit: probonono (Read error: 104 (Connection reset by peer)) 06:37:23 --- nick: madwork_ -> madwork 06:37:45 --- nick: luptenschteiner -> probonono 06:38:31 --- quit: DrunkTomato () 06:39:15 --- join: Al2O3 (n=Al2O3@75.70.11.191) joined #forth 06:47:33 --- quit: probonono ("Arrgh.. box crashing again!") 06:55:23 crc: That only grabs the next word during run-time. http://forth.pastebin.ca/1770800 The problem word is "walk." It grabs "endwin" and not "left" in the case statement. 07:00:23 jabb: obviously wrong implementation, if that's standard Forth. 07:00:50 See IMMEDIATE, also note the difference between ' and ['] 07:01:17 See also POSTPONE 07:02:00 You either convert "walk" definition to use POSTPONE, 07:02:07 or pass xt to it. 07:02:21 Like in "['] left walk". 07:02:35 Ahh. What I linked is gforth. 07:03:02 My words apply. 07:04:33 Instead of "['] left walk." Wouldn't "left walk" be extremely similar? 07:04:54 That's better, yes. 07:09:44 Thanks. I'm sure I'll figure it out :) 07:11:09 something like this may work: http://retroforth.com/paste/?id=1943 07:16:15 'later' won't necessarily work in all implementations 07:17:35 "Later" is evil. 07:18:40 its useful at times 07:19:46 I'd write "left player walk" and used "+!" 07:20:13 This is straightforward and doesn't require evil gymnastics. 07:21:58 : walk ( dx dy x y ) rot swap +! +! ; 07:30:20 what would you do instead of: : .wrap ( - ) ." ( " later ." )" ; 07:34:00 ^ ^ 07:38:05 --- quit: crcx (Ping timeout: 180 seconds) 07:38:29 --- join: crcx (i=d8012b82@gateway/web/freenode/x-ciyfhnredauyaglo) joined #forth 07:39:20 ['] smth wrapped 07:39:33 This is way better than using "later". 07:39:47 It nests at the first place. 08:31:31 --- join: PoppaVic (n=pops@99.150.138.254) joined #forth 08:37:59 --- join: GeDaMo (n=gedamo@dyn-62-56-89-110.dslaccess.co.uk) joined #forth 09:08:38 --- join: GoNoGo (n=GoNoGo@cro34-3-82-236-93-215.fbx.proxad.net) joined #forth 09:20:27 --- join: kar8nga (n=kar8nga@jol13-1-82-66-176-74.fbx.proxad.net) joined #forth 09:51:38 --- quit: mathrick (Read error: 104 (Connection reset by peer)) 09:51:41 --- join: _mathrick (n=mathrick@users177.kollegienet.dk) joined #forth 09:52:58 --- nick: _mathrick -> mathrick 10:11:55 --- quit: jabb (Read error: 60 (Operation timed out)) 10:12:05 --- join: jabb (n=grue@71.94.31.166) joined #forth 10:18:52 --- join: Guthur (n=Michael@host81-132-171-8.range81-132.btcentralplus.com) joined #forth 10:33:55 --- join: Quartus` (n=Quartus`@74.198.8.58) joined #forth 10:41:57 --- join: Maki (n=Maki@dynamic-78-30-167-37.adsl.eunet.rs) joined #forth 10:48:22 --- join: pgas (n=user@pdpc/supporter/active/pgas) joined #forth 11:25:24 --- quit: Frek (Excess Flood) 11:25:57 --- join: Frek (n=nnnnnnnn@81-225-142-146-no36.tbcn.telia.com) joined #forth 11:37:11 --- quit: mathrick (Read error: 110 (Connection timed out)) 11:52:31 --- quit: nottwo (Read error: 104 (Connection reset by peer)) 11:59:07 --- join: mathrick (n=mathrick@users177.kollegienet.dk) joined #forth 13:00:19 --- quit: pgas ("/quit") 13:26:38 --- join: alex4nder (n=alexande@wsip-72-215-164-129.sb.sd.cox.net) joined #forth 13:27:12 hey 13:31:28 Hi alex4nder. Is your project going well? 13:37:58 Maki: Hey, it's going well.. I took a little bit of a break working on some contract assignments 13:38:01 how're you doing? 13:45:06 Nice. 13:46:31 First week on my new job was relaxed. 13:46:48 nice 13:47:12 It appears that I'm going to work on ZigBee functionality of the meter. 13:47:31 ah, that's cool 13:47:36 what chips are you programming? 13:48:02 I've worked earlier woth microchip pic18f 13:48:27 But we didn;t decided on platform yet. 13:48:52 cool 13:49:00 Microchip stack is small but with glass legs :) 13:49:14 I got a call the other day, about potential work on the atmel sam3-series, which might be fun. 13:49:18 hah 13:49:47 Great! 13:50:46 --- quit: Quartus` (Read error: 110 (Connection timed out)) 13:52:59 yah.. so things seem like they're doing well. 13:53:20 --- quit: crcx ("Page closed") 13:58:15 --- join: GoNoGo_ (n=GoNoGo@cro34-3-82-236-93-215.fbx.proxad.net) joined #forth 13:59:24 --- quit: GoNoGo_ (Remote closed the connection) 14:00:59 --- quit: GoNoGo (Read error: 60 (Operation timed out)) 14:16:58 --- quit: kar8nga (Remote closed the connection) 14:24:38 --- quit: Maki ("Leaving") 14:29:48 --- quit: qFox (Client Quit) 15:01:25 --- quit: GeDaMo ("Leaving.") 15:16:43 --- quit: crc (Read error: 110 (Connection timed out)) 15:18:17 --- join: crc2 (n=charlesc@c-68-80-139-0.hsd1.pa.comcast.net) joined #forth 15:27:27 --- join: segher (n=segher@84-105-60-153.cable.quicknet.nl) joined #forth 15:54:14 --- quit: alex4nder (Read error: 110 (Connection timed out)) 16:06:55 --- join: TR2N` (i=email@89.180.238.94) joined #forth 16:11:37 --- join: alex4nder (n=alexande@dsl093-145-168.sba1.dsl.speakeasy.net) joined #forth 16:11:49 re.. 16:34:51 --- quit: TR2N (Connection timed out) 16:38:17 --- nick: TR2N` -> TR2N 17:51:06 later is interesting 17:53:05 --- quit: Zarutian () 17:55:47 jabb: it looks like cute trick at first, but it isn't so at closer look. 17:57:29 I don't think my implementation is a special case in which you should use it :P 18:10:16 Hello!! 18:10:23 :P 18:10:25 :D 18:12:03 hey 18:17:32 Hello alexfourander 18:20:08 Ha-ha! I've found that old link someone mentioned. 18:20:11 http://www.humanmetrics.com/cgi-win/JTypes2.asp 18:20:38 The service works still. 18:37:04 Did you answer the questions ASau 18:37:49 In past we had a table for distribution of regulars over those types somewhere. 18:39:27 I've done those tests before a couple of times 18:39:44 through work team building things etc 18:40:06 I'm glad that we don't have those stupid things like team building. 18:40:37 May they've gone out of fashion now 18:40:41 Maybe* 18:41:01 I've heard of those from my room-mate years ago. 18:41:08 I haven't worked for that company in about 1.5 years 18:41:25 He worked for bank at that time. 18:41:55 Perhaps he works there today as well, it is hard to leave bank when you're working there for years. 18:42:14 Insurance Software maintenance was the one I was at 18:42:32 maybe its financial companies 18:42:33 Ah. 18:42:44 Same shit. 18:43:05 Indeed, dreadful work 18:43:15 This explains why you had that "team building". 18:43:37 Help us forget how dreadful it was? 18:44:51 I've head rather awful experience in school of confronting 18:44:52 crowd and authorities (teachers and school director). 18:45:18 A bit like "The Wave." 18:45:56 I've read annotations and this is enough for me not to read it. :| 18:47:59 hehe, the amount of times I open a line of code with a parenthesis is getting annoying, fine when you actually are using CL.... 18:49:03 CL is better than Forth. 18:49:28 And its certainly better than what I am using at the moment 18:49:49 Scheme? 18:49:53 well truth be told I have so little ROM on this chip C is probably the only option 18:50:01 C 18:50:04 Ah. 18:50:53 --- quit: gogonkt (verne.freenode.net irc.freenode.net) 18:50:54 --- quit: madgarden (verne.freenode.net irc.freenode.net) 18:51:08 --- join: gogonkt (n=info@218.13.56.193) joined #forth 18:51:54 I like this embedded stuff though, but I am only experimenting to try and familiarise myself with the ARM architecture. 18:53:30 "Brothers in ARM5" :) 18:54:32 hehe. I get to play with FPGAs next week 18:56:13 In fact, it should be possible to pack Forth into ARM provided Thumb mode. 18:56:43 Only that may be DAMN slow. 18:57:38 Some of the ARMs have a decent amount of memory 18:58:10 Alright, I want to get some sleep. 18:58:13 and they can address up to 4giB if you are willing to use external 18:58:27 Good morning to you. 18:58:36 I need to do the same, after I get this serial link working 18:58:46 Good morning, hehe 18:58:48 Better postpone it. 18:58:56 probably 19:03:58 --- join: scj (i=syljo361@boneym.mtveurope.org) joined #forth 19:08:15 --- join: madgarden (n=madgarde@CPE001d7e527f89-CM00159a65a870.cpe.net.cable.rogers.com) joined #forth 19:49:55 --- quit: TR2N (Success) 19:52:42 --- quit: ubuntu-nathan ("Leaving") 19:57:20 hey 19:58:21 --- quit: Guthur ("Computer says no") 20:08:06 --- log: started forth/10.01.29 20:08:06 --- join: clog (n=nef@bespin.org) joined #forth 20:08:06 --- topic: 'The Forth programming language, etc. | Logged by clog | forth.pastebin.ca | quartus.net/search | gforth: tinyurl.com/s8uho | isforth.com | ANS Standard: tinyurl.com/nx7dx | Wiki: forthfreak.net' 20:08:06 --- topic: set by tathi on [Mon Nov 30 04:40:25 2009] 20:08:06 --- names: list (clog madgarden scj gogonkt alex4nder segher crc2 mathrick Frek jabb PoppaVic Al2O3 proteusguy ASau` madwork Snoopy_1611 tgunr_ beatup_by_tools TreyB tarbo maht gnomon nighty^ yiyus malyn addled ASau KipIngram nighty_ schme rotty uiu) 20:08:18 --- log: started forth/10.01.29 20:08:18 --- join: clog (n=nef@bespin.org) joined #forth 20:08:18 --- topic: 'The Forth programming language, etc. | Logged by clog | forth.pastebin.ca | quartus.net/search | gforth: tinyurl.com/s8uho | isforth.com | ANS Standard: tinyurl.com/nx7dx | Wiki: forthfreak.net' 20:08:18 --- topic: set by tathi on [Mon Nov 30 04:40:25 2009] 20:08:18 --- names: list (clog madgarden scj gogonkt alex4nder segher crc2 mathrick Frek jabb PoppaVic Al2O3 proteusguy ASau` madwork Snoopy_1611 tgunr_ beatup_by_tools TreyB tarbo maht gnomon nighty^ yiyus malyn addled ASau KipIngram nighty_ schme rotty uiu) 20:10:27 --- quit: Al2O3 () 21:11:03 --- join: Snoopy_1711 (i=Snoopy_1@dslb-084-059-098-146.pools.arcor-ip.net) joined #forth 21:19:12 --- join: I440r (n=mark4@c-69-136-171-118.hsd1.in.comcast.net) joined #forth 21:19:51 --- mode: ChanServ set +o I440r 21:28:42 --- quit: Snoopy_1611 (Read error: 110 (Connection timed out)) 21:47:47 --- mode: ChanServ set +o crc2 21:47:50 --- nick: crc2 -> crc 21:50:10 --- quit: tgunr_ (Client Quit) 21:52:20 --- join: tgunr (n=tgunr@cust-66-249-166-11.static.o1.com) joined #forth 21:53:09 --- quit: tgunr (Remote closed the connection) 22:16:17 --- quit: I440r ("Leaving") 22:33:44 :) 22:59:27 --- join: qFox (n=C00K13S@5356B263.cable.casema.nl) joined #forth 23:12:58 re.. 23:24:31 --- quit: proteusguy (Read error: 60 (Operation timed out)) 23:34:17 --- join: I440r (n=mark4@c-69-136-171-118.hsd1.in.comcast.net) joined #forth 23:36:37 --- join: proteusguy (n=proteusg@zeppelin.proteus-tech.com) joined #forth 23:49:22 --- mode: ChanServ set +o I440r 23:50:25 --- quit: proteusguy (Remote closed the connection) 23:59:59 --- log: ended forth/10.01.29