00:00:00 --- log: started forth/17.06.26 00:46:25 --- join: roundsf (~user@2a00:2381:1a72:10:c8b0:7d21:5de3:deb0) joined #forth 00:58:16 --- join: dys (~dys@2003:5b:203b:100:6af7:28ff:fe06:801) joined #forth 00:58:41 --- quit: mtsd (Quit: Page closed) 01:06:29 --- quit: ACE_Recliner (Remote host closed the connection) 01:06:39 --- quit: nighty-_ (Ping timeout: 246 seconds) 01:15:52 --- join: nighty-_ (~cp@www.taiyolabs.com) joined #forth 01:21:55 --- join: ZarutianPI2 (~pi@168-110-22-46.fiber.hringdu.is) joined #forth 01:21:55 --- quit: ZarutianPI (Read error: Connection reset by peer) 02:05:26 --- join: xek (xek@nat/intel/x-mnrmqgrhiyawyqjd) joined #forth 02:39:14 --- join: mtsd (3e5f4c02@gateway/web/freenode/ip.62.95.76.2) joined #forth 02:49:25 --- quit: nighty- (Quit: Disappears in a puff of smoke) 03:14:55 --- join: GeDaMo (~GeDaMo@212.225.125.110) joined #forth 03:38:01 --- join: nighty- (~nighty@s229123.ppp.asahi-net.or.jp) joined #forth 05:13:51 --- nick: ZarutianPI2 -> ZarutianPI 05:42:05 --- quit: wa5qjh (Remote host closed the connection) 05:48:36 --- join: wa5qjh (~Thunderbi@121.54.90.145) joined #forth 05:57:28 --- quit: wa5qjh (Remote host closed the connection) 06:33:06 --- join: true-grue (~true-grue@176.14.219.178) joined #forth 06:56:06 --- quit: mtsd (Ping timeout: 260 seconds) 07:10:40 --- join: mrottenkolber (~mrottenko@dslb-084-063-111-083.084.063.pools.vodafone-ip.de) joined #forth 07:15:03 Hi, so I am toying around with an F18A emulator, and I wonder (apparently not seeing the obvious), using the instruction set, how do I swap T and S without changing the stack otherwise? I.e. like over sans pushing the stack. 07:16:25 do you have xor? 07:16:29 yes 07:16:53 https://en.wikipedia.org/wiki/XOR_swap_algorithm 07:22:28 don’t see how that helps me, as I can’t just access T S randomly 07:23:12 oh. sorry, I'm not familiar with F18A 07:24:28 push temp ! pop temp @ 07:28:54 https://web.archive.org/web/20160310112802/http://colorforth.com/inst.htm 07:30:55 That seems to have a few definitions of swap 07:38:03 yeah I just found https://stackoverflow.com/questions/20141067/implement-swap-in-forth/20141626 07:38:14 seems the solution is to use the return stack 07:38:59 Or you can use the A register 07:40:41 --- join: Zarutian (~zarutian@168-110-22-46.fiber.hringdu.is) joined #forth 07:59:14 --- join: xlov (9f7f20fe@gateway/web/freenode/ip.159.127.32.254) joined #forth 08:21:34 What kind of Forth applications are being developed that are of the Non-Embedded nature? 08:26:44 Postscript applications? :) 08:29:33 --- join: proteusguy (~proteus-g@2405:9800:b408:bc31:71df:9c43:18f9:297b) joined #forth 08:29:33 --- mode: ChanServ set +v proteusguy 08:31:04 Can it be used in data processing? (ie: Data Wrangling?) 08:43:46 --- part: xlov left #forth 09:22:38 --- quit: Zarutian (Quit: Zarutian) 09:23:03 --- quit: carc (Ping timeout: 258 seconds) 09:27:37 --- join: carc (~carc@unaffiliated/carc) joined #forth 09:32:17 --- quit: dys (Ping timeout: 246 seconds) 09:55:32 --- quit: mrottenkolber (Ping timeout: 240 seconds) 10:11:07 --- join: dual (~bonafide@cpe-74-75-153-119.maine.res.rr.com) joined #forth 10:25:44 --- quit: GeDaMo (Ping timeout: 260 seconds) 10:33:00 --- join: xlov (9f7f20fe@gateway/web/freenode/ip.159.127.32.254) joined #forth 10:44:17 --- join: GeDaMo (~GeDaMo@212.225.125.110) joined #forth 11:22:16 --- part: xlov left #forth 11:37:55 --- quit: karswell` (Remote host closed the connection) 11:39:43 --- join: karswell` (~user@132.91.199.146.dyn.plus.net) joined #forth 11:56:30 --- join: mrottenkolber (~mrottenko@dslb-084-063-111-083.084.063.pools.vodafone-ip.de) joined #forth 12:06:38 --- quit: Uniju (Ping timeout: 246 seconds) 12:13:55 --- join: Uniju (~frog_styl@cpe-74-78-4-232.mass.res.rr.com) joined #forth 12:31:06 tomaw: error: unterminated comment 13:27:30 --- quit: GeDaMo (Remote host closed the connection) 13:29:27 --- quit: dual (Ping timeout: 240 seconds) 13:45:07 --- join: Zarutian (~zarutian@168-110-22-46.fiber.hringdu.is) joined #forth 14:07:32 continuing my puzzledness: on an F18A, how would you move i.e. the 7th word in the data stack to the top? 14:09:05 Ha-ha. 14:09:06 repeated drops i would imagine? afair the stack is T and S registers, and then a ring buffer 14:09:24 * DGASAU is waiting for typical forth question for such occasions. 14:09:59 i.e. only the top two stack positions are actually destroyed when you do a long string of drops 14:10:55 koisoke: that’s how I implemented arbitrary dups, but I don’t think I can *move* a word this way. ie. (a b c d e f g) -> (move e to top) -> (e a b c d f g) 14:14:23 oh. i thought you meant PICK without deleting the value 14:15:14 background: I hacked up an F18A emulator, and am now trying to compile a scheme-like dynamic language to that architecture (silly I know) 14:15:14 i'm pretty sure there is no way to do that without vomiting the stack out to memory down to the level you want 14:15:47 --- quit: proteusguy (Remote host closed the connection) 14:17:03 not sure why you need to do that for scheme, but also not sure scheme is a great fit for a core with 64 words of ram 14:17:17 I think it's already time to switch from GA chips to KiloCore :) 14:18:30 well, since its an (imprecise) emulator I can scale word/stack/ram size freely. 14:18:58 I really liked to program SEAforth chips. But I remember how sometimes I wished to have simple RISC cores instead of F18 :) 14:19:10 also that’s kind of why it’s fun 14:19:53 its not going to be exactly scheme 14:19:55 mrottenkolber: give more info? what are you trying to do that you need to pick-and-delete to arbitrary depth like that? 14:20:58 You can try TIS-100 too :) 14:21:35 koisoke: I am using the data stack as the... stack (return stack as FP) 14:23:27 and I figured to compile (lambda (a b c d e) (f a e d c b b)) I need that operation 14:23:38 it’s kind of a long story 14:25:37 and you are trying to implement some kind of henry baker-inspired thing so the picks need to be destructive? 14:25:53 yeah bulls eye 14:26:06 baker is an influence 14:27:46 f18 stack is the wrong structure for that unless you can make the compiler smart enough to eliminate random accesses 14:28:24 :-) 14:28:47 maybe not eliminate, rather reduce 14:29:59 adding instructions is an option too 14:30:17 I’m sitting in a sandbox 14:31:10 true-grue: re TIS-100, why play a game when you can hack your own sandbox? (awesome game, btw) 14:35:50 mrottenkolber, I remember how we made VentureForth simulator free for the users. We hoped that hobbysts will do something interesting, will write some applications. But even now the majority is stick with unneccessary details like circular stack, register A etc. The most fun and impressive thing is not coding of 1-2 lines in colorForth, but making the distributed program with many interacting computers, mapping it to the lattice graph etc. But yet, 14:35:50 nobody is working on the systems level... 14:37:42 * ZarutianPI recommends people look into Flow Based Programming for inspiration on how to program such multicomp porgrams. 14:38:27 s/por/pro/ 14:38:45 * ZarutianPI porpoises away but stays in the vincinity 15:51:17 true-grue: a big reason why I found the F18A interesting as a starting point is the I/O port abstraction between nodes and other interfaces 15:55:59 --- join: wa5qjh (~Thunderbi@121.54.90.145) joined #forth 15:58:06 --- quit: nighty- (Quit: Disappears in a puff of smoke) 16:00:36 --- quit: Zarutian (Quit: Zarutian) 16:04:30 --- quit: true-grue (Read error: Connection reset by peer) 17:12:54 --- quit: mrottenkolber (Ping timeout: 260 seconds) 17:43:34 --- mode: crc set +o koisoke 18:28:25 --- join: nighty- (~nighty@kyotolabs.asahinet.com) joined #forth 19:26:53 --- quit: wa5qjh (Remote host closed the connection) 19:29:57 --- join: wa5qjh (~Thunderbi@121.54.90.145) joined #forth 20:28:32 --- quit: Bunny351 (Ping timeout: 240 seconds) 20:55:07 --- quit: lonjil (Read error: Connection reset by peer) 20:55:15 --- join: lonjil (~quassel@2a02:418:6050:ed15:ed15:ed15:e741:32d6) joined #forth 21:10:26 --- join: Bunny351 (~Bunny351@p4FD2D6FA.dip0.t-ipconnect.de) joined #forth 21:16:41 --- quit: wa5qjh (Ping timeout: 268 seconds) 21:20:56 --- join: wa5qjh (~Thunderbi@121.54.90.145) joined #forth 21:39:01 --- quit: wa5qjh (Remote host closed the connection) 21:41:48 --- join: wa5qjh (~Thunderbi@121.54.90.145) joined #forth 22:13:50 --- join: altLeCamarade (~revence@139.59.111.106) joined #forth 22:13:59 --- join: rpcope- (~GOTZNC@162.245.217.4) joined #forth 22:14:18 --- quit: LeCamarade (Ping timeout: 260 seconds) 22:14:19 --- quit: rpcope (Ping timeout: 260 seconds) 22:39:33 --- quit: dzho (Ping timeout: 260 seconds) 22:39:34 --- quit: coelebs (Ping timeout: 260 seconds) 22:39:34 --- join: dzho (~dzho@unaffiliated/dzho) joined #forth 22:45:03 --- join: coelebs (viileppi@gateway/shell/blinkenshell.org/x-eyzxpqkpgnhsfayx) joined #forth 23:03:08 --- join: mtsd (3e5f4c02@gateway/web/freenode/ip.62.95.76.2) joined #forth 23:59:59 --- log: ended forth/17.06.26