00:00:00 --- log: started retro/08.11.01
04:25:55 --- join: neceve (n=ncv@unaffiliated/neceve) joined #retro
07:06:49 --- quit: virl ("Verlassend")
11:14:34 --- join: lukeparrish (n=opera@74-36-210-33.dr01.hmdl.id.frontiernet.net) joined #retro
11:15:04 --- mode: ChanServ set +o lukeparrish
11:22:41 <lukeparrish> here's a simple new library file I made for retro 10... could be extended with additional features.
11:22:54 <lukeparrish> ( safety.retro )
11:22:54 <lukeparrish> ( Safety features to prevent accidental crashes. )
11:22:54 <lukeparrish> : normal-dot . ;
11:22:54 <lukeparrish> : . ( safe dot ) depth 0 =if 0 then normal-dot ;
11:31:08 --- join: virl (n=virl__@chello062178085149.1.12.vie.surfer.at) joined #retro
11:38:21 <lukeparrish> ( safety.retro )
11:38:21 <lukeparrish> ( Safety features to prevent accidental crashes. )
11:38:21 <lukeparrish> : (normal-dot) . ;
11:38:21 <lukeparrish> : . ( safer dot ) depth 0 =if 0 then (normal-dot) ;
11:38:21 <lukeparrish> : (normal-comma) , ;
11:38:21 <lukeparrish> : , ( safer comma ) depth 0 =if 0 then (normal-comma) ;
11:51:56 <lukeparrish> might be cleaner with scopes... I should try it.
13:06:12 <lukeparrish> seems strange that 'last' returns the number 27
13:38:34 <lukeparrish> hmm. looks like primitives aren't vectors.
15:47:55 <lukeparrish> ok, here's a version using vectors:
15:48:09 <lukeparrish> ( safety.retro )
15:48:09 <lukeparrish> ( Safety features to prevent accidental crashes. )
15:48:09 <lukeparrish> {
15:48:09 <lukeparrish> ' . 
15:48:09 <lukeparrish> : . ( safer dot ) depth 0 =if 0 then [ compile ] ;
15:48:10 <lukeparrish> ' .
15:48:12 <lukeparrish> } : . ; is .
15:48:14 <lukeparrish> {
15:48:16 <lukeparrish> ' ,
15:48:18 <lukeparrish> : , ( safer comma ) depth 0 =if 0 then [ compile ] ;
15:48:20 <lukeparrish> ' ,
15:48:22 <lukeparrish> } : , ; is ,
15:58:38 --- quit: neceve ("Konversation terminated!")
19:12:00 --- quit: lukeparrish (Read error: 110 (Connection timed out))
22:57:13 --- join: lukeparrish (n=opera@74-47-187-227.dr01.hmdl.id.frontiernet.net) joined #retro
22:57:40 --- mode: ChanServ set +o lukeparrish
23:59:59 --- log: ended retro/08.11.01