1 USING: kernel ctags ctags.etags tools.test io.backend sequences arrays prettyprint hashtables assocs ;
8 "path" H{ } clone etag-at =
14 "path" H{ { "path" V{ if { "path" 1 } } } } etag-at =
21 { if { "path" 1 } } H{ } clone etag-vector =
28 { { "path" V{ if { "path" 1 } } } } >hashtable
36 { if { "resource:core/kernel/kernel.factor" 28 } } etag-pair =
42 H{ { "path" V{ { if 1 } } } }
43 { if { "path" 1 } } H{ } clone [ etag-add ] keep =
49 H{ { "path" V{ { if 1 } } } }
50 { { if { "path" 1 } } } etag-hash =
53 ! line-bytes (note that for each line implicit \n is counted)
57 { "1234567890" "12345" } 2 lines>bytes =
64 { "1234567890" "12345" } { if 2 } etag =