insert
LCS, diffing and distance

Prev:	levenshtein ( old new -- n )
Next:	delete

Vocabulary
lcs

Class description
Represents an action in an edit script where an item is added, going from the initial sequence to the final sequence. This has one slot, called item, containing the thing which is inserted

Definition

IN: lcs

TUPLE: insert item ;

Methods

USING: lcs lcs.diff2html xml.data xml.syntax.private ;

M: insert diff-line
    item-string 1 nenum T{ xml-chunk
        { seq
            V{
                ""
                T{ tag { name ~name~ } { children ~vector~ } }
                ""
            }
        }
    } interpolate-xml ;