00:00:00 --- log: started forth/16.04.04 00:04:13 --- join: scoofy (~scoofy@catv-89-135-80-2.catv.broadband.hu) joined #forth 00:04:26 --- quit: ASau (Ping timeout: 264 seconds) 00:40:53 --- join: wa5qjh1 (~Thunderbi@203.111.224.33) joined #forth 00:42:01 --- quit: wa5qjh (Ping timeout: 250 seconds) 00:42:01 --- nick: wa5qjh1 -> wa5qjh 01:26:37 --- quit: scoofy (Ping timeout: 244 seconds) 01:49:02 --- join: proteusguy (~proteusgu@9e.7b.5177.ip4.static.sl-reverse.com) joined #forth 01:49:02 --- mode: ChanServ set +v proteusguy 02:09:11 --- quit: proteusguy (Remote host closed the connection) 02:09:37 --- join: proteusguy (~proteusgu@ppp-124-121-72-198.revip2.asianet.co.th) joined #forth 02:09:37 --- mode: ChanServ set +v proteusguy 02:56:25 --- join: scoofy (~scoofy@catv-89-135-80-2.catv.broadband.hu) joined #forth 03:13:22 --- quit: mnemnion (Remote host closed the connection) 03:35:15 --- quit: DocPlatypus (Ping timeout: 244 seconds) 04:12:10 --- join: DocPlatypus (~skquinn@c-73-166-108-48.hsd1.tx.comcast.net) joined #forth 04:19:30 --- quit: wa5qjh (Quit: wa5qjh) 04:27:21 --- quit: proteusguy (Ping timeout: 250 seconds) 04:34:21 --- join: proteusguy (~proteusgu@9e.7b.5177.ip4.static.sl-reverse.com) joined #forth 04:34:21 --- mode: ChanServ set +v proteusguy 04:50:49 --- quit: proteusguy (Remote host closed the connection) 04:56:03 --- join: proteusguy (~proteusgu@9e.7b.5177.ip4.static.sl-reverse.com) joined #forth 04:56:03 --- mode: ChanServ set +v proteusguy 05:14:03 --- join: karswell (~user@76.153.208.46.dyn.plus.net) joined #forth 05:36:00 --- quit: novaskell (Quit: leaving) 05:46:19 --- quit: DocPlatypus (Quit: Leaving) 06:29:48 --- quit: proteusguy (Remote host closed the connection) 06:44:59 --- join: true-grue (~true-grue@176.14.216.104) joined #forth 06:55:33 --- join: picobit (~tomkl@unaffiliated/tomkl) joined #forth 07:46:06 --- join: impomatic_ (~impomatic@85.8.189.80.dyn.plus.net) joined #forth 07:49:10 --- quit: impomatic (Ping timeout: 276 seconds) 07:49:17 --- nick: impomatic_ -> impomatic 08:03:18 --- quit: DGASAU (Read error: Connection reset by peer) 08:03:25 --- join: DGASAU (~user@lmpc.drb.insel.de) joined #forth 08:27:29 --- quit: picobit (Ping timeout: 252 seconds) 09:31:39 --- quit: DGASAU (Read error: Connection reset by peer) 09:31:48 --- join: DGASAU (~user@lmpc.drb.insel.de) joined #forth 10:51:09 --- join: Carisius (~Carisius@cm-188-171-2-86.telecable.es) joined #forth 11:15:42 --- join: bedah (~bedah@dyndsl-037-138-055-220.ewe-ip-backbone.de) joined #forth 11:29:05 --- join: real-grue (~true-grue@176.14.216.104) joined #forth 11:33:10 --- quit: true-grue (Ping timeout: 244 seconds) 11:48:43 --- join: novaskell (~novaskell@31.205.156.216) joined #forth 11:59:53 --- join: sc00fy (~scoofy@catv-89-135-80-2.catv.broadband.hu) joined #forth 12:01:03 --- quit: scoofy (Ping timeout: 244 seconds) 12:17:50 --- join: impomatic_ (~impomatic@179.236.200.146.dyn.plus.net) joined #forth 12:19:28 --- quit: impomatic (Ping timeout: 246 seconds) 12:19:29 --- nick: impomatic_ -> impomatic 12:35:54 --- quit: Carisius (Ping timeout: 260 seconds) 13:08:13 --- join: Starq (8115894a@gateway/web/freenode/ip.129.21.137.74) joined #forth 13:09:21 Hello, does anyone have a minute to help me understand defining words? I'm having some trouble 13:15:48 --- quit: Starq (Ping timeout: 250 seconds) 13:39:57 --- join: mnemnion (~mnemnion@c-98-207-249-139.hsd1.ca.comcast.net) joined #forth 14:07:32 --- join: ASau (~user@netbsd/developers/asau) joined #forth 14:17:47 --- join: starq (81158a60@gateway/web/freenode/ip.129.21.138.96) joined #forth 14:19:54 --- join: Zarutian (~zarutian@168-110-22-46.fiber.hringdu.is) joined #forth 14:44:30 --- join: eazar001 (~eazar001@99-151-0-118.lightspeed.snrmca.sbcglobal.net) joined #forth 14:46:08 --- quit: karswell (Read error: Connection reset by peer) 14:47:16 --- join: karswell (~user@76.153.208.46.dyn.plus.net) joined #forth 14:52:26 --- quit: starq (Ping timeout: 250 seconds) 14:53:11 --- quit: real-grue (Read error: Connection reset by peer) 14:55:39 --- mode: ChanServ set +v bluekelp_ 14:55:54 --- nick: bluekelp_ -> bluekelp 15:12:34 --- quit: Zarutian (Quit: Zarutian) 15:23:12 --- join: wa5qjh (~Thunderbi@203.111.224.33) joined #forth 15:41:29 --- join: picobit (~tomkl@unaffiliated/tomkl) joined #forth 16:11:41 --- quit: eazar001 (Read error: Connection reset by peer) 16:11:46 --- quit: bedah (Quit: Ex-Chat) 16:19:50 --- quit: mnemnion (Remote host closed the connection) 16:26:01 --- join: vsg1990 (~vsg1990@pool-74-110-57-203.bflony.fios.verizon.net) joined #forth 16:41:13 --- quit: jadedctrl (Remote host closed the connection) 16:58:36 --- join: DocPlatypus (~skquinn@c-73-166-108-48.hsd1.tx.comcast.net) joined #forth 17:02:50 What's the easiest way to convert a number into a string in Gforth? 17:03:31 koz_: the pictured numeric output words? <# # and #> 17:04:01 just be sure base is set correctly first 17:04:02 DocPlatypus: Is that the Forthy sprintf or something? 17:04:16 koz_: it's as close as we have to it 17:04:25 koz_: look at the source of . (print number) to see how it's used 17:04:34 It's 'see .' right? 17:04:59 (to see the source of .) 17:05:07 yeah but you might want to go and read the actual source. sometimes see gives you something different than what was input as source 17:05:24 DocPlatypus: OK, thanks, will investigate. I'm currently solving all the Project Euler problems in Gforth. 17:05:35 Unless there's a Forthier way to detect a palindromic number. 17:05:42 actually you will wind up looking at d.r 17:06:07 I can't think of one right off-hand 17:06:27 you mean a number reading the same backwards as forwards, in decimal (or whatever base), right? 17:06:34 DocPlatypus: Yeah, exactly that. 17:06:38 (and it's in decimal) 17:07:34 you may want to write a word to check if a string is palindromic first 17:07:51 then use that to check the number converted to string 17:08:10 as an added bonus you now have most of the code to find palindromic words as well :-) 17:08:17 Indeed. 17:08:22 Thanks for that - will investigate. 17:10:46 how I'd solve it: write a word to take a string and copy it to another string with characters reversed. then compare them 17:12:46 Yeah, that works. 17:12:54 Right now, I'm still trying to make sense of the conversion thing. 17:13:34 it's actually <# #s #> ... though there is a GNU Forth variant <<# which I'm not sure what the difference is 17:13:45 OK, let me try it. 17:14:06 So would it be something like '10 <# #s #>'? 17:14:12 That gives me a stack underflow. 17:14:16 Starq, have you seen http://www.forth.org/svfig/Len/definwds.htm ? What are your questions? 17:15:42 koz_: It is just a few reductions from the definitions. `<#' expects a double cell integer on DStack. 17:16:10 DKordic` and DocPlatypus: Never mind - I can do this without conversion it seems. 17:16:20 I mean Number Systems etc. , not Forth definitions. 17:17:20 koz_: <# expects a double 17:17:28 10 s>d <# #s #> 17:18:27 Thanks DocPlatypus. 17:20:21 --- join: mnemnion (~mnemnion@c-98-207-249-139.hsd1.ca.comcast.net) joined #forth 17:50:32 --- join: eazar001 (~eazar001@99-151-0-118.lightspeed.snrmca.sbcglobal.net) joined #forth 17:59:06 --- quit: eazar001 (Ping timeout: 244 seconds) 18:37:47 --- quit: wa5qjh (Quit: wa5qjh) 18:54:26 --- quit: oceanpollen (Ping timeout: 244 seconds) 18:55:25 --- join: oceanpollen (~jfondren@50.116.75.241) joined #forth 18:58:55 --- join: eazar001 (~eazar001@99-151-0-118.lightspeed.snrmca.sbcglobal.net) joined #forth 19:03:44 --- join: impomatic_ (~impomatic@37.152.222.136) joined #forth 19:05:40 --- quit: impomatic (Ping timeout: 248 seconds) 19:05:54 --- nick: impomatic_ -> impomatic 19:08:37 --- quit: eazar001 () 19:16:56 --- join: starq (43f78240@gateway/web/freenode/ip.67.247.130.64) joined #forth 19:17:13 hello 19:35:08 --- quit: Keshl (Read error: Connection reset by peer) 19:35:19 --- join: Keshl (~Purple@24.115.181.94.res-cmts.gld.ptd.net) joined #forth 19:35:24 Hello starq 19:42:37 heya, does anyone have a minute to help me better understand defining words? 19:47:58 starq, yes, what's your question? 20:06:32 thanks pointfree, i queried you 20:29:36 --- quit: mnemnion (Remote host closed the connection) 20:34:17 --- join: mnemnion (~mnemnion@c-98-207-249-139.hsd1.ca.comcast.net) joined #forth 20:36:59 would be better if we kept chat like this in the channel so all could benefit 20:53:27 Yeah 20:53:46 The conversation already happened. 20:54:51 : field s>d <# #s [char] A hold #> header, reveal dovar: cfa, over , + does> @ + ; 20:58:49 ( We talked about a struct field defining word that takes the number passed on the stack as part of the name of the field) 20:59:01 ok 21:03:00 starq, "The word HOLD is invoked by # which first decrements the variable" holdptr "and stores the least-significant digit into PAD as an ASCII character." 21:03:11 https://web.archive.org/web/20130520210235/http://www.jimbrooks.org/web/forth/forthPicturedNumericOutput.php 21:08:04 apologies DocPlatypus 21:08:48 and thanks for all your help pointfree 21:13:19 my pleasure 21:15:41 ok it's all good 21:15:50 maybe this was stuff that's been covered in the channel in the past 21:25:32 --- quit: vsg1990 (Quit: Leaving) 21:27:41 --- quit: picobit (Ping timeout: 260 seconds) 22:16:10 --- quit: starq (Ping timeout: 250 seconds) 22:33:24 --- join: Kumool (~kumool@adsl-64-237-238-167.prtc.net) joined #forth 23:59:59 --- log: ended forth/16.04.04