hara.code.block.construct — hara/code 3.0.6

*container-props* clj

*tags* clj

+formfeed+ clj

+newline+ clj

+return+ clj

+space+ clj

add-child clj

(add-child container elem)

adds a child to a container block

(-> (block []) (add-child 1) (add-child 2) (str)) => "[12]"

block clj

(block elem)

creates a block

(base/block-info (block 1)) => {:type :token, :tag :long, :string "1", :height 0, :width 1}

(str (block [1 (newline) (void) 2])) => "[1\n 2]"

comment clj

(comment s)

creates a comment block

(str (comment ";hello")) => ";hello"

construct-children clj

(construct-children form)

constructs the children

(mapv str (construct-children [1 (newline) (void) 2])) => ["1" "
" "␣" "2"]

construct-collection clj multimethod

constructs a collection

(str (construct-collection [1 2 (void) (void) 3])) => "[1 2 3]"

container clj

(container tag children)

creates a container

(str (container :list [(void) (void)])) => "( )"

container-checks clj

(container-checks tag children props)

performs checks for the container

contents clj

(contents block)

reads out the contents of a container

(contents (block [1 2 3])) => '[1 ␣ 2 ␣ 3]

cursor clj

(cursor)

creates a cursor for the navigator

(str (cursor)) => "|"

empty clj

(empty)

constructs empty list

(str (empty)) => "()"

newline clj

(newline)

creates a newline

(str (newline)) => "
"

newlines clj

(newlines n)

creates multiple newlines

(apply str (newlines 5)) => "




"

root clj

(root children)

constructs a root block

(str (root '[a b])) => "a b"

space clj

(space)

creates a space block

(str (space)) => "␣"

spaces clj

(spaces n)

creates multiple space blocks

(apply str (spaces 5)) => "␣␣␣␣␣"

string-token clj

(string-token form)

constructs a string token

(str (string-token "hello")) => ""hello""

(str (string-token "hello\nworld")) => ""hello
world""

tab clj

(tab)

creates a tab

(str (tab)) => "\ "

tabs clj

(tabs n)

creates multiple tabs

(apply str (tabs 5)) => "\ \ \ \ \ "

token clj

(token form)

creates a token

(str (token 'abc)) => "abc"

token-dimensions clj

(token-dimensions tag string)

returns the dimensions of the token

(token-dimensions :regexp "#"hello
world"") => [15 0]

(token-dimensions :regexp "#"hello\nworld"") => [6 1]

token-from-string clj

(token-from-string string)

(token-from-string string value value-string)

creates a token from a string input

(str (token-from-string "abc")) => "abc"

uneval clj

(uneval)

creates a hash-uneval block

(str (uneval)) => "#_"

void clj

(void)

(void ch)

creates a void block

(str (void)) => "␣"

void-lookup clj