00:00:00 --- log: started retro/17.01.02
01:17:38 --- quit: mnemnia (Remote host closed the connection)
07:40:42 --- join: mnemnion (~mnemnion@71.198.73.193) joined #retro
07:45:23 --- quit: mnemnion (Ping timeout: 256 seconds)
08:33:15 --- join: mnemnion (~mnemnion@71.198.73.193) joined #retro
08:37:31 --- quit: mnemnion (Ping timeout: 245 seconds)
08:57:03 --- join: Mat4 (~claude4@ip5b40bc14.dynamic.kabel-deutschland.de) joined #retro
09:26:46 --- join: mnemnion (~mnemnion@71.198.73.193) joined #retro
09:45:34 --- join: neceve (~ncv@79.115.225.255) joined #retro
09:45:34 --- quit: neceve (Changing host)
09:45:34 --- join: neceve (~ncv@unaffiliated/neceve) joined #retro
09:50:36 <Mat4> crc, I've now started working on implementing the discussed changes (postfix colon prefix)
09:52:59 --- quit: crc (Ping timeout: 240 seconds)
09:54:39 --- quit: Mat4 (Quit: Leaving)
09:57:30 --- join: crc (uid2647@gateway/web/irccloud.com/x-tawcpucxxwkqtyym) joined #retro
09:58:02 --- quit: neceve (Quit: Konversation terminated!)
10:05:10 --- join: Mat4 (~claude4@ip5b40bc14.dynamic.kabel-deutschland.de) joined #retro
10:19:51 <Mat4> crc: sorry, what is required to add a new prefix routine ?
10:53:30 --- quit: Mat4 (Quit: Leaving)
11:48:50 --- join: mnemnia (~mnemnion@2601:643:8102:7c95:54d8:b9a3:a967:8ca6) joined #retro
11:52:12 --- quit: mnemnion (Ping timeout: 252 seconds)
14:06:11 <crc> Mat4: define a new word starting with prefix: followed by the character
15:54:25 --- quit: mnemnia (Remote host closed the connection)
15:58:06 --- join: pointfree (uid204397@gateway/web/irccloud.com/x-ebfdeuhpggtorxsd) joined #retro
16:06:27 --- join: mnemnion (~mnemnion@71.198.73.193) joined #retro
18:07:52 --- join: neceve (~ncv@unaffiliated/neceve) joined #retro
18:34:57 <crc> the prefix word will receive a pointer to a string with the rest of the token.
19:30:52 <crc> Here's an implementation of the @ and ! prefixes for use with variables:
19:31:07 <crc> :prefix:@ d:lookup d:xt class:data &fetch class:word ; immediate
19:31:08 <crc> :prefix:! d:lookup d:xt class:data &store class:word ; immediate
19:31:17 <crc> :prefix:@ d:lookup d:xt class:data &fetch class:word ; immediate
19:31:17 <crc> :prefix:! d:lookup d:xt class:data &store class:word ; immediate
19:31:31 <crc> hmm, sorry for pasting twice :(
19:37:04 <crc> supporting numeric pointers as well makes it a bit longer:
19:37:10 <crc> :prefix:@
19:37:10 <crc>   dup d:lookup dup n:-zero?
19:37:10 <crc>   [ nip d:xt fetch ]
19:37:10 <crc>   [ drop s:to-number ] choose
19:37:10 <crc>   class:data &fetch class:word ; immediate
19:57:55 --- quit: neceve (Ping timeout: 258 seconds)
20:00:46 --- join: neceve (~ncv@79.115.225.255) joined #retro
20:00:46 --- quit: neceve (Changing host)
20:00:46 --- join: neceve (~ncv@unaffiliated/neceve) joined #retro
21:03:10 --- quit: neceve (Quit: Konversation terminated!)
22:45:59 --- join: mat4 (~Claude@ip5b4104d5.dynamic.kabel-deutschland.de) joined #retro
22:47:33 --- quit: mat4 (Client Quit)
23:59:59 --- log: ended retro/17.01.02