+fun! <SID>Prep_Signs()
+ if ! exists("b:signdot") || ! g:marksigns
+ let b:signdot=0
+ endif
+ if ! exists("b:signdash") || ! g:marksigns
+ let b:signdash=0
+ endif
+ if ! exists("b:signquote") || ! g:marksigns
+ let b:signquote=0
+ endif
+ if ! exists("b:signcaret") || ! g:marksigns
+ let b:signcaret=0
+ endif
+ if ! exists("b:signless") || ! g:marksigns
+ let b:signless=0
+ endif
+ if ! exists("b:signgreater") || ! g:marksigns
+ let b:signgreater=0
+ endif
+ if ! exists("b:signleft") || ! g:marksigns
+ let b:signleft=0
+ endif
+ if ! exists("b:signright") || ! g:marksigns
+ let b:signright=0
+ endif
+ if ! exists("b:signa") || ! g:marksigns
+ let b:signa=0
+ endif
+ if ! exists("b:signb") || ! g:marksigns
+ let b:signb=0
+ endif
+ if ! exists("b:signc") || ! g:marksigns
+ let b:signc=0
+ endif
+ if ! exists("b:signd") || ! g:marksigns
+ let b:signd=0
+ endif
+ if ! exists("b:signe") || ! g:marksigns
+ let b:signe=0
+ endif
+ if ! exists("b:signf") || ! g:marksigns
+ let b:signf=0
+ endif
+ if ! exists("b:signA") || ! g:marksigns
+ let b:signA=0
+ endif
+ if ! exists("b:signB") || ! g:marksigns
+ let b:signB=0
+ endif
+ if ! exists("b:signC") || ! g:marksigns
+ let b:signC=0
+ endif
+ if ! exists("b:signD") || ! g:marksigns
+ let b:signD=0
+ endif
+ if ! exists("b:signE") || ! g:marksigns
+ let b:signE=0
+ endif
+ if ! exists("b:signF") || ! g:marksigns
+ let b:signF=0
+ endif
+endfun!
+
+fun! <SID>Place_Sign(number, line, old, name)
+ if a:line == a:old
+ return a:old
+ endif
+
+ exe "sign unplace " . (g:firstsign + a:number) . " buffer=" . bufnr("")
+ " Don't place the sign if it would conflict with the last change sign.
+ exe "sign place " . (g:firstsign + a:number) . " line=" . a:line . " name=" . a:name . " buffer=" . bufnr("")
+ return a:line
+endfun
+
+fun! <SID>Highlight_Signs(...)
+ if ! has("signs") || ! g:marksigns || Uncluttered_Buffer()
+ return
+ endif
+
+ call <SID>Prep_Signs()
+
+ let b:signdot = <SID>Place_Sign(0, line("'."), b:signdot, "MarkDot")
+ let b:signdash = <SID>Place_Sign(1, line("''"), b:signdash, "MarkDash")
+ let b:signquote = <SID>Place_Sign(2, line("'\""), b:signquote, "MarkQuote")
+ let b:signcaret = <SID>Place_Sign(3, line("'^"), b:signcaret, "MarkCaret")
+ let b:signless = <SID>Place_Sign(4, line("'<"), b:signcaret, "MarkLess")
+ let b:signgreater = <SID>Place_Sign(5, line("'>"), b:signcaret, "MarkGreater")
+ let b:signleft = <SID>Place_Sign(6, line("'["), b:signcaret, "MarkLeft")
+ let b:signright = <SID>Place_Sign(7, line("']"), b:signcaret, "MarkRight")
+
+ let b:signa = <SID>Place_Sign(8, line("'a"), b:signa, "Marka")
+ let b:signb = <SID>Place_Sign(9, line("'b"), b:signb, "Markb")
+ let b:signc = <SID>Place_Sign(10, line("'c"), b:signc, "Markc")
+ let b:signd = <SID>Place_Sign(11, line("'d"), b:signd, "Markd")
+ let b:signe = <SID>Place_Sign(12, line("'e"), b:signe, "Marke")
+ let b:signf = <SID>Place_Sign(13, line("'f"), b:signf, "Markf")
+ let b:signA = <SID>Place_Sign(14, line("'A"), b:signA, "MarkA")
+ let b:signB = <SID>Place_Sign(15, line("'B"), b:signB, "MarkB")
+ let b:signC = <SID>Place_Sign(16, line("'C"), b:signC, "MarkC")
+ let b:signD = <SID>Place_Sign(17, line("'D"), b:signD, "MarkD")
+ let b:signE = <SID>Place_Sign(18, line("'E"), b:signE, "MarkE")
+ let b:signF = <SID>Place_Sign(19, line("'F"), b:signF, "MarkF")
+endfun