Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- calling function SlimvConnectServer()
- line 1: let repl_buf = bufnr( g:slimv_repl_file )
- line 2: let repl_win = bufwinnr( repl_buf )
- line 3: if repl_buf == -1 || ( g:slimv_repl_split && repl_win == -1 )
- line 4: call SlimvOpenReplBuffer()
- calling function SlimvConnectServer..SlimvOpenReplBuffer()
- line 1: call SlimvOpenBuffer( g:slimv_repl_file )
- calling function SlimvConnectServer..SlimvOpenReplBuffer..SlimvOpenBuffer('Slimv.REPL.lisp')
- line 1: let buf = bufnr( a:name )
- line 2: if buf == -1
- line 3: " Create a new buffer
- line 4: call s:SplitView( a:name )
- calling function SlimvConnectServer..SlimvOpenReplBuffer..SlimvOpenBuffer..<SNR>70_SplitView('Slimv.REPL.lisp')
- line 1: if winnr('$') == 2
- line 2: " We have exactly two windows
- line 3: if bufnr("%") == s:current_buf && winnr() == s:current_win
- line 4: " Keep the current window on screen, use the other window for the new buffer
- line 5: execute "wincmd w"
- line 6: endif
- line 7: execute "silent view! " . a:filename
- line 8: else
- line 9: if g:slimv_repl_split == 1
- line 10: execute "silent topleft sview! " . a:filename
- line 11: elseif g:slimv_repl_split == 2
- line 12: execute "silent botright sview! " . a:filename
- line 13: elseif g:slimv_repl_split == 3
- line 14: execute "silent topleft vertical sview! " . a:filename
- line 15: elseif g:slimv_repl_split == 4
- line 16: execute "silent botright vertical sview! " . a:filename
- line 16: silent botright vertical sview! Slimv.REPL.lisp
- Executing WinLeave Auto commands for "*"
- autocommand :call <SID>YRWinLeave()
- line 0: :call <SID>YRWinLeave()
- calling function <SNR>50_YRWinLeave()
- line 1: " Track which window we are last in. We will use this information
- line 2: " to determine where we need to paste any contents, or which
- line 3: " buffer to return to.
- line 4:
- line 5: if s:yr_buffer_id < 0
- line 6: " The yankring window has never been activated
- line 7: return
- function <SNR>50_YRWinLeave returning #0
- continuing in WinLeave Auto commands for "*"
- chdir(/Users/sjl/src/lol)
- Executing WinEnter Auto commands for "*"
- autocommand call s:Highlight_Matching_Pair()
- line 0: call s:Highlight_Matching_Pair()
- calling function <SNR>53_Highlight_Matching_Pair()
- line 1: " Remove any previous match.
- line 2: if exists('w:paren_hl_on') && w:paren_hl_on
- line 3: 3match none
- line 4: let w:paren_hl_on = 0
- line 5: endif
- line 6:
- line 7: " Avoid that we remove the popup menu.
- line 8: " Return when there are no colors (looks like the cursor jumps).
- line 9: if pumvisible() || (&t_Co < 8 && !has("gui_running"))
- line 10: return
- line 11: endif
- line 12:
- line 13: " Get the character under the cursor and check if it's in 'matchpairs'.
- line 14: let c_lnum = line('.')
- line 15: let c_col = col('.')
- line 16: let before = 0
- line 17:
- line 18: let c = getline(c_lnum)[c_col - 1]
- line 19: let plist = split(&matchpairs, '.\zs[:,]')
- line 20: let i = index(plist, c)
- line 21: if i < 0
- line 22: " not found, in Insert mode try character before the cursor
- line 23: if c_col > 1 && (mode() == 'i' || mode() == 'R')
- line 24: let before = 1
- line 25: let c = getline(c_lnum)[c_col - 2]
- line 26: let i = index(plist, c)
- line 27: endif
- line 28: if i < 0
- line 29: " not found, nothing to do
- line 30: return
- line 31: endif
- line 32: endif
- line 33:
- line 34: " Figure out the arguments for searchpairpos().
- line 35: if i % 2 == 0
- line 36: let s_flags = 'nW'
- line 37: let c2 = plist[i + 1]
- line 38: else
- line 39: let s_flags = 'nbW'
- line 40: let c2 = c
- line 41: let c = plist[i - 1]
- line 42: endif
- line 43: if c == '['
- line 44: let c = '\['
- line 45: let c2 = '\]'
- line 46: endif
- line 47:
- line 48: " Find the match. When it was just before the cursor move it there for a
- line 49: " moment.
- line 50: if before > 0
- line 51: let save_cursor = winsaveview()
- line 52: call cursor(c_lnum, c_col - before)
- line 53: endif
- line 54:
- line 55: " When not in a string or comment ignore matches inside them.
- line 56: " We match "escape" for special items, such as lispEscapeSpecial.
- line 57: let s_skip ='synIDattr(synID(line("."), col("."), 0), "name") ' . '=~? "string\\|character\\|singlequote\\|escape\\|comment"'
- line 59: execute 'if' s_skip '| let s_skip = 0 | endif'
- line 59: if synIDattr(synID(line("."), col("."), 0), "name") =~? "string\\|character\\|singlequote\\|escape\\|comment" | let s_skip = 0 | endif
- line 59: let s_skip = 0 | endif
- line 59: endif
- line 60:
- line 61: " Limit the search to lines visible in the window.
- line 62: let stoplinebottom = line('w$')
- line 63: let stoplinetop = line('w0')
- line 64: if i % 2 == 0
- line 65: let stopline = stoplinebottom
- line 66: else
- line 67: let stopline = stoplinetop
- line 68: endif
- line 69:
- line 70: try
- line 71: " Limit the search time to 300 msec to avoid a hang on very long lines.
- line 72: " This fails when a timeout is not supported.
- line 73: let [m_lnum, m_col] = searchpairpos(c, '', c2, s_flags, s_skip, stopline, 300)
- line 74: catch /E118/
- line 75: " Can't use the timeout, restrict the stopline a bit more to avoid taking
- line 76: " a long time on closed folds and long lines.
- line 77: " The "viewable" variables give a range in which we can scroll while
- line 78: " keeping the cursor at the same position.
- line 79: " adjustedScrolloff accounts for very large numbers of scrolloff.
- line 80: let adjustedScrolloff = min([&scrolloff, (line('w$') - line('w0')) / 2])
- line 81: let bottom_viewable = min([line('$'), c_lnum + &lines - adjustedScrolloff - 2])
- line 82: let top_viewable = max([1, c_lnum-&lines+adjustedScrolloff + 2])
- line 83: " one of these stoplines will be adjusted below, but the current values are
- line 84: " minimal boundaries within the current window
- line 85: if i % 2 == 0
- line 86: if has("byte_offset") && has("syntax_items") && &smc > 0
- line 87: ^Ilet stopbyte = min([line2byte("$"), line2byte(".") + col(".") + &smc * 2])
- line 88: ^Ilet stopline = min([bottom_viewable, byte2line(stopbyte)])
- line 89: else
- line 90: ^Ilet stopline = min([bottom_viewable, c_lnum + 100])
- line 91: endif
- line 92: let stoplinebottom = stopline
- line 93: else
- line 94: if has("byte_offset") && has("syntax_items") && &smc > 0
- line 95: ^Ilet stopbyte = max([1, line2byte(".") + col(".") - &smc * 2])
- line 96: ^Ilet stopline = max([top_viewable, byte2line(stopbyte)])
- line 97: else
- line 98: ^Ilet stopline = max([top_viewable, c_lnum - 100])
- line 99: endif
- line 100: let stoplinetop = stopline
- line 101: endif
- line 102: let [m_lnum, m_col] = searchpairpos(c, '', c2, s_flags, s_skip, stopline)
- line 103: endtry
- line 104:
- line 105: if before > 0
- line 106: call winrestview(save_cursor)
- line 107: endif
- line 108:
- line 109: " If a match is found setup match highlighting.
- line 110: if m_lnum > 0 && m_lnum >= stoplinetop && m_lnum <= stoplinebottom
- line 111: exe '3match MatchParen /\(\%' . c_lnum . 'l\%' . (c_col - before) . 'c\)\|\(\%' . m_lnum . 'l\%' . m_col . 'c\)/'
- line 111: 3match MatchParen /\(\%1l\%1c\)\|\(\%1l\%7c\)/
- line 113: let w:paren_hl_on = 1
- line 114: endif
- function <SNR>53_Highlight_Matching_Pair returning #0
- continuing in WinEnter Auto commands for "*"
- chdir(/Users/sjl/src/lol)
- fchdir() to previous dir
- Executing BufAdd Auto commands for "*"
- autocommand call <SID>BMAdd()
- line 0: call <SID>BMAdd()
- calling function <SNR>14_BMAdd()
- line 1: if s:bmenu_wait == 0
- line 2: " when adding too many buffers, redraw in short format
- line 3: if s:bmenu_count == &menuitems && s:bmenu_short == 0
- line 4: call s:BMShow()
- line 5: else
- line 6: call <SID>BMFilename(expand("<afile>"), expand("<abuf>"))
- calling function <SNR>14_BMAdd..<SNR>14_BMFilename('Slimv.REPL.lisp', '6')
- line 1: if isdirectory(a:name)
- line 2: return
- line 3: endif
- line 4: let munge = <SID>BMMunge(a:name, a:num)
- calling function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMMunge('Slimv.REPL.lisp', '6')
- line 1: let name = a:fname
- line 2: if name == ''
- line 3: if !exists("g:menutrans_no_file")
- line 4: let g:menutrans_no_file = "[No file]"
- line 5: endif
- line 6: let name = g:menutrans_no_file
- line 7: else
- line 8: let name = fnamemodify(name, ':p:~')
- line 9: endif
- line 10: " detach file name and separate it out:
- line 11: let name2 = fnamemodify(name, ':t')
- line 12: if a:bnum >= 0
- line 13: let name2 = name2 . ' (' . a:bnum . ')'
- line 14: endif
- line 15: let name = name2 . "\t" . <SID>BMTruncName(fnamemodify(name,':h'))
- calling function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMMunge..<SNR>14_BMTruncName('~/src/lol')
- line 1: let name = a:fname
- line 2: if g:bmenu_max_pathlen < 5
- line 3: let name = ""
- line 4: else
- line 5: let len = strlen(name)
- line 6: if len > g:bmenu_max_pathlen
- line 7: let amountl = (g:bmenu_max_pathlen / 2) - 2
- line 8: let amountr = g:bmenu_max_pathlen - amountl - 3
- line 9: let pattern = '^\(.\{,' . amountl . '}\).\{-}\(.\{,' . amountr . '}\)$'
- line 10: let left = substitute(name, pattern, '\1', '')
- line 11: let right = substitute(name, pattern, '\2', '')
- line 12: if strlen(left) + strlen(right) < len
- line 13: ^Ilet name = left . '...' . right
- line 14: endif
- line 15: endif
- line 16: endif
- line 17: return name
- function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMMunge..<SNR>14_BMTruncName returning '~/src/lol'
- continuing in function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMMunge
- line 16: let name = escape(name, "\\. \t|")
- line 17: let name = substitute(name, "&", "&&", "g")
- line 18: let name = substitute(name, "\n", "^@", "g")
- line 19: return name
- function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMMunge returning 'Slimv\.REPL\.lisp\ (6)\^I~/src/lol'
- continuing in function <SNR>14_BMAdd..<SNR>14_BMFilename
- line 5: let hash = <SID>BMHash(munge)
- calling function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMHash('Slimv\.REPL\.lisp\ (6)\ ~/src/lol')
- line 1: " Make name all upper case, so that chars are between 32 and 96
- line 2: let nm = substitute(a:name, ".*", '\U\0', "")
- line 3: if has("ebcdic")
- line 4: " HACK: Replace all non alphabetics with 'Z'
- line 5: " Just to make it work for now.
- line 6: let nm = substitute(nm, "[^A-Z]", 'Z', "g")
- line 7: let sp = char2nr('A') - 1
- line 8: else
- line 9: let sp = char2nr(' ')
- line 10: endif
- line 11: " convert first six chars into a number for sorting:
- line 12: return (char2nr(nm[0]) - sp) * 0x800000 + (char2nr(nm[1]) - sp) * 0x20000 + (char2nr(nm[2]) - sp) * 0x1000 + (char2nr(nm[3]) - sp) * 0x80 + (char2nr(nm[4]) - sp) * 0x20 + (char2nr(nm[5]) - sp)
- function <SNR>14_BMAdd..<SNR>14_BMFilename..<SNR>14_BMHash returning #433761660
- continuing in function <SNR>14_BMAdd..<SNR>14_BMFilename
- line 6: if s:bmenu_short == 0
- line 7: let name = 'an ' . g:bmenu_priority . '.' . hash . ' &Buffers.' . munge
- line 8: else
- line 9: let name = 'an ' . g:bmenu_priority . '.' . hash . '.' . hash . ' &Buffers.' . <SID>BMHash2(munge) . munge
- line 10: endif
- line 11: " set 'cpo' to include the <CR>
- line 12: let cpo_save = &cpo
- line 13: set cpo&vim
- line 14: exe name . ' :confirm b' . a:num . '<CR>'
- line 14: an 60.433761660 &Buffers.Slimv\.REPL\.lisp\ (6)\^I~/src/lol :confirm b6<CR>
- line 15: let &cpo = cpo_save
- function <SNR>14_BMAdd..<SNR>14_BMFilename returning #0
- continuing in function <SNR>14_BMAdd
- line 7: let s:bmenu_count = s:bmenu_count + 1
- line 8: endif
- line 9: endif
- function <SNR>14_BMAdd returning #0
- continuing in BufAdd Auto commands for "*"
- Reading viminfo file "/Users/sjl/.viminfo" marks
- Executing BufNewFile Auto commands for "*.lisp"
- autocommand setf lisp
- line 0: setf lisp
- Executing FileType Auto commands for "*"
- autocommand call s:LoadFTPlugin()
- line 0: call s:LoadFTPlugin()
- calling function <SNR>16_LoadFTPlugin()
- line 1: if exists("b:undo_ftplugin")
- line 2: exe b:undo_ftplugin
- line 3: unlet! b:undo_ftplugin b:did_ftplugin
- line 4: endif
- line 5:
- line 6: let s = expand("<amatch>")
- line 7: if s != ""
- line 8: if &cpo =~# "S" && exists("b:did_ftplugin")
- line 9: ^I" In compatible mode options are reset to the global values, need to
- line 10: ^I" set the local values also when a plugin was already used.
- line 11: ^Iunlet b:did_ftplugin
- line 12: endif
- line 13:
- line 14: " When there is a dot it is used to separate filetype names. Thus for
- line 15: " "aaa.bbb" load "aaa" and then "bbb".
- line 16: for name in split(s, '\.')
- line 17: ^Iexe 'runtime! ftplugin/' . name . '.vim ftplugin/' . name . '_*.vim ftplugin/' . name . '/*.vim'
- line 17: runtime! ftplugin/lisp.vim ftplugin/lisp_*.vim ftplugin/lisp/*.vim
- Searching for "ftplugin/lisp.vim ftplugin/lisp_*.vim ftplugin/lisp/*.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bun
- Searching for "/Users/sjl/.vim/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/ftplugin/lisp/*.vim"
- chdir(/Users/sjl/.vim/ftplugin/lisp)
- fchdir() to previous dir
- line 17: sourcing "/Users/sjl/.vim/ftplugin/lisp/lispfolding.vim"
- line 1: if exists('loaded_lispfolding') || &cp
- line 2: finish
- finished sourcing /Users/sjl/.vim/ftplugin/lisp/lispfolding.vim
- continuing in function <SNR>16_LoadFTPlugin
- Searching for "/Users/sjl/.vim/bundle/ack/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/ftplugin/lisp/*.vim"
- chdir(/Users/sjl/.vim/bundle/slimv/ftplugin/lisp)
- fchdir() to previous dir
- line 17: sourcing "/Users/sjl/.vim/bundle/slimv/ftplugin/lisp/slimv-lisp.vim"
- line 1: " slimv-lisp.vim:
- line 2: " Lisp filetype plugin for Slimv
- line 3: " Version: 0.8.4
- line 4: " Last Change: 28 May 2011
- line 5: " Maintainer: Tamas Kovacs <kovisoft at gmail dot com>
- line 6: " License: This file is placed in the public domain.
- line 7: " No warranty, express or implied.
- line 8: " *** *** Use At-Your-Own-Risk! *** ***
- line 9: "
- line 10: " =====================================================================
- line 11: "
- line 12: " Load Once:
- line 13: if exists("b:did_ftplugin")
- line 14: finish
- line 15: endif
- line 16:
- line 17: " ---------- Begin part loaded once ----------
- line 18: if !exists( 'g:slimv_lisp_loaded' )
- line 19:
- line 20: let g:slimv_lisp_loaded = 1
- line 21:
- line 22: " Try to autodetect Lisp executable
- line 23: " Returns list [Lisp executable, Lisp implementation]
- line 24: function! b:SlimvAutodetect()
- line 113:
- line 114: " Try to find out the Lisp implementation
- line 115: function! b:SlimvImplementation()
- line 127:
- line 128: " Filename for the REPL buffer file
- line 129: function! b:SlimvREPLFile()
- line 132:
- line 133: " Lookup symbol in the list of Lisp Hyperspec symbol databases
- line 134: function! b:SlimvHyperspecLookup( word, exact, all )
- line 161:
- line 162: " Source Slimv general part
- line 163: runtime ftplugin/**/slimv.vim
- line 164:
- line 165: endif "!exists( 'g:slimv_lisp_loaded' )
- line 166: " ---------- End of part loaded once ----------
- line 167:
- line 168: runtime ftplugin/**/lisp.vim
- Searching for "ftplugin/**/lisp.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bundle/vim-coffee-script,/Users/sjl/.vim
- Searching for "/Users/sjl/.vim/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/ftplugin/**/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/ftplugin/**/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/ftplugin/**/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/**/lisp.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin)
- fchdir() to previous dir
- line 168: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp.vim"
- line 1: " Vim filetype plugin
- line 2: " Language: Lisp
- line 3: " Maintainer: Sergey Khorev <sergey.khorev@gmail.com>
- line 4: " URL:^I^I http://iamphet.nm.ru/vim
- line 5: " Original author: Dorai Sitaram <ds26@gte.com>
- line 6: " Original URL:^I^I http://www.ccs.neu.edu/~dorai/vimplugins/vimplugins.html
- line 7: " Last Change: Nov 8, 2004
- line 8:
- line 9: " Only do this when not done yet for this buffer
- line 10: if exists("b:did_ftplugin")
- line 11: finish
- line 12: endif
- line 13:
- line 14: " Don't load another plugin for this buffer
- line 15: let b:did_ftplugin = 1
- line 16:
- line 17: setl comments=:;
- line 18: setl define=^\\s*(def\\k*
- line 19: setl formatoptions-=t
- line 20: setl iskeyword+=+,-,*,/,%,<,=,>,:,$,?,!,@-@,94
- line 21: setl lisp
- line 22:
- line 23: " make comments behaviour like in c.vim
- line 24: " e.g. insertion of ;;; and ;; on normal "O" or "o" when staying in comment
- line 25: setl comments^=:;;;,:;;,sr:#\|,mb:\|,ex:\|#
- line 26: setl formatoptions+=croql
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp.vim
- continuing in /Users/sjl/lib/dotfiles/vim/bundle/slimv/ftplugin/lisp/slimv-lisp.vim
- line 169:
- line 170: " Must be called for each lisp buffer
- line 171: call SlimvInitBuffer()
- calling function SlimvInitBuffer()
- line 1: " Map space to display function argument list in status line
- line 2: inoremap <silent> <buffer> <Space> <Space><C-R>=SlimvArglist()<CR>
- line 3: "noremap <silent> <buffer> <C-C> :call SlimvInterrupt()<CR>
- line 4: au InsertLeave * :let &showmode=s:save_showmode
- line 5: inoremap <silent> <buffer> <C-X>0 <C-O>:call SlimvCloseForm()<CR>
- line 6: inoremap <silent> <buffer> <Tab> <C-R>=pumvisible() ? "\<lt>C-N>" : "\<lt>C-X>\<lt>C-O>"<CR>
- function SlimvInitBuffer returning #0
- continuing in /Users/sjl/lib/dotfiles/vim/bundle/slimv/ftplugin/lisp/slimv-lisp.vim
- line 172:
- line 173: " Don't load another plugin for this buffer
- line 174: let b:did_ftplugin = 1
- line 175:
- finished sourcing /Users/sjl/.vim/bundle/slimv/ftplugin/lisp/slimv-lisp.vim
- continuing in function <SNR>16_LoadFTPlugin
- Searching for "/Users/sjl/.vim/bundle/snipmate/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/ftplugin/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/ftplugin/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/ftplugin/lisp_*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/ftplugin/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin)
- fchdir() to previous dir
- line 17: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp.vim"
- line 1: " Vim filetype plugin
- line 2: " Language: Lisp
- line 3: " Maintainer: Sergey Khorev <sergey.khorev@gmail.com>
- line 4: " URL:^I^I http://iamphet.nm.ru/vim
- line 5: " Original author: Dorai Sitaram <ds26@gte.com>
- line 6: " Original URL:^I^I http://www.ccs.neu.edu/~dorai/vimplugins/vimplugins.html
- line 7: " Last Change: Nov 8, 2004
- line 8:
- line 9: " Only do this when not done yet for this buffer
- line 10: if exists("b:did_ftplugin")
- line 11: finish
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp.vim
- continuing in function <SNR>16_LoadFTPlugin
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp_*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/ftplugin/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/ftplugin/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/ftplugin/lisp_*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/ftplugin/lisp/*.vim"
- Searching for "/Users/sjl/.vim/after/ftplugin/lisp.vim"
- Searching for "/Users/sjl/.vim/after/ftplugin/lisp_*.vim"
- Searching for "/Users/sjl/.vim/after/ftplugin/lisp/*.vim"
- line 18: endfor
- line 16: for name in split(s, '\.')
- line 17: ^Iexe 'runtime! ftplugin/' . name . '.vim ftplugin/' . name . '_*.vim ftplugin/' . name . '/*.vim'
- line 18: endfor
- line 19: endif
- function <SNR>16_LoadFTPlugin returning #0
- continuing in FileType Auto commands for "*"
- Executing FileType Auto commands for "*"
- autocommand call s:LoadIndent()
- line 0: call s:LoadIndent()
- calling function <SNR>17_LoadIndent()
- line 1: if exists("b:undo_indent")
- line 2: exe b:undo_indent
- line 3: unlet! b:undo_indent b:did_indent
- line 4: endif
- line 5: let s = expand("<amatch>")
- line 6: if s != ""
- line 7: if exists("b:did_indent")
- line 8: ^Iunlet b:did_indent
- line 9: endif
- line 10:
- line 11: " When there is a dot it is used to separate filetype names. Thus for
- line 12: " "aaa.bbb" load "indent/aaa.vim" and then "indent/bbb.vim".
- line 13: for name in split(s, '\.')
- line 14: ^Iexe 'runtime! indent/' . name . '.vim'
- line 14: runtime! indent/lisp.vim
- Searching for "indent/lisp.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bundle/vim-coffee-script,/Users/sjl/.vim/bund
- Searching for "/Users/sjl/.vim/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/indent/lisp.vim"
- chdir(/Users/sjl/.vim/bundle/slimv/indent)
- fchdir() to previous dir
- line 14: sourcing "/Users/sjl/.vim/bundle/slimv/indent/lisp.vim"
- line 1: " lisp.vim:
- line 2: " Lisp indent plugin for Slimv
- line 3: " Version: 0.8.3
- line 4: " Last Change: 14 May 2011
- line 5: " Maintainer: Tamas Kovacs <kovisoft at gmail dot com>
- line 6: " License: This file is placed in the public domain.
- line 7: " No warranty, express or implied.
- line 8: " *** *** Use At-Your-Own-Risk! *** ***
- line 9: "
- line 10: " =====================================================================
- line 11: "
- line 12: " Load Once:
- line 13: if exists("b:did_indent")
- line 14: finish
- line 15: endif
- line 16:
- line 17: setlocal nolisp
- line 18: setlocal autoindent
- line 19: setlocal indentexpr=SlimvIndent(v:lnum)
- line 20:
- finished sourcing /Users/sjl/.vim/bundle/slimv/indent/lisp.vim
- continuing in function <SNR>17_LoadIndent
- Searching for "/Users/sjl/.vim/bundle/snipmate/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/indent/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/indent/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/indent/lisp.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime/indent)
- fchdir() to previous dir
- line 14: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/indent/lisp.vim"
- line 1: " Vim indent file
- line 2: " Language:^ILisp
- line 3: " Maintainer: Sergey Khorev <sergey.khorev@gmail.com>
- line 4: " URL:^I^I http://iamphet.nm.ru/vim
- line 5: " Last Change:^I2005 May 19
- line 6:
- line 7: " Only load this indent file when no other was loaded.
- line 8: if exists("b:did_indent")
- line 9: finish
- line 10: endif
- line 11: let b:did_indent = 1
- line 12:
- line 13: setlocal ai nosi
- line 14:
- line 15: let b:undo_indent = "setl ai< si<"
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/indent/lisp.vim
- continuing in function <SNR>17_LoadIndent
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/indent/lisp.vim"
- Searching for "/Users/sjl/.vim/after/indent/lisp.vim"
- line 15: endfor
- line 13: for name in split(s, '\.')
- line 14: ^Iexe 'runtime! indent/' . name . '.vim'
- line 15: endfor
- line 16: endif
- function <SNR>17_LoadIndent returning #0
- continuing in FileType Auto commands for "*"
- Executing FileType Auto commands for "lisp"
- autocommand call TurnOnLispFolding()
- line 0: call TurnOnLispFolding()
- calling function TurnOnLispFolding()
- line 1: setlocal foldexpr=GetLispFold()
- line 2: setlocal foldmethod=expr
- function TurnOnLispFolding returning #0
- continuing in FileType Auto commands for "lisp"
- Executing FileType Auto commands for "*"
- autocommand if &ft != 'help' | call GetSnippets(snippets_dir, &ft) | endif
- line 0: if &ft != 'help' | call GetSnippets(snippets_dir, &ft) | endif
- line 0: call GetSnippets(snippets_dir, &ft) | endif
- calling function GetSnippets('/Users/sjl/.vim/snippets/', 'lisp')
- line 1: ^Ifor ft in split(a:filetypes, '\.')
- line 2: ^I^Iif has_key(g:did_ft, ft) | continue | endif
- line 2: continue | endif
- line 1: ^Ifor ft in split(a:filetypes, '\.')
- line 2: ^I^Iif has_key(g:did_ft, ft) | continue | endif
- line 2: continue | endif
- line 2: endif
- line 3: ^I^Icall s:DefineSnips(a:dir, ft, ft)
- line 4: ^I^Iif ft == 'objc' || ft == 'cpp' || ft == 'cs'
- line 5: ^I^I^Icall s:DefineSnips(a:dir, 'c', ft)
- line 6: ^I^Ielseif ft == 'xhtml'
- line 7: ^I^I^Icall s:DefineSnips(a:dir, 'html', 'xhtml')
- line 8: ^I^Iendif
- line 9: ^I^Ilet g:did_ft[ft] = 1
- line 10: ^Iendfor
- function GetSnippets returning #0
- continuing in FileType Auto commands for "*"
- line 0: endif
- Executing FileType Auto commands for "*"
- autocommand exe "set syntax=" . expand("<amatch>")
- line 0: exe "set syntax=" . expand("<amatch>")
- line 0: set syntax=lisp
- Executing Syntax Auto commands for "*"
- autocommand call s:SynSet()
- line 0: call s:SynSet()
- calling function <SNR>19_SynSet()
- line 1: " clear syntax for :set syntax=OFF and any syntax name that doesn't exist
- line 2: syn clear
- line 3: if exists("b:current_syntax")
- line 4: unlet b:current_syntax
- line 5: endif
- line 6:
- line 7: let s = expand("<amatch>")
- line 8: if s == "ON"
- line 9: " :set syntax=ON
- line 10: if &filetype == ""
- line 11: echohl ErrorMsg
- line 12: echo "filetype unknown"
- line 13: echohl None
- line 14: endif
- line 15: let s = &filetype
- line 16: endif
- line 17:
- line 18: if s != ""
- line 19: " Load the syntax file(s). When there are several, separated by dots,
- line 20: " load each in sequence.
- line 21: for name in split(s, '\.')
- line 22: exe "runtime! syntax/" . name . ".vim syntax/" . name . "/*.vim"
- line 22: runtime! syntax/lisp.vim syntax/lisp/*.vim
- Searching for "syntax/lisp.vim syntax/lisp/*.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bundle/vim-coffee-script,/U
- Searching for "/Users/sjl/.vim/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/syntax/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/syntax/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/syntax/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/syntax/lisp.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime/syntax)
- fchdir() to previous dir
- line 22: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/syntax/lisp.vim"
- line 1: " Vim syntax file
- line 2: " Language: Lisp
- line 3: " Maintainer: Dr. Charles E. Campbell, Jr. <NdrOchipS@PcampbellAfamily.Mbiz>
- line 4: " Last Change: Nov 16, 2010
- line 5: " Version: 22
- line 6: " URL:^I http://mysite.verizon.net/astronaut/vim/index.html#vimlinks_syntax
- line 7: "
- line 8: " Thanks to F Xavier Noria for a list of 978 Common Lisp symbols
- line 9: " taken from the HyperSpec
- line 10: " Clisp additions courtesy of http://clisp.cvs.sourceforge.net/*checkout*/clisp/clisp/emacs/lisp.vim
- line 11:
- line 12: " ---------------------------------------------------------------------
- line 13: " Load Once: {{{1
- line 14: " For vim-version 5.x: Clear all syntax items
- line 15: " For vim-version 6.x: Quit when a syntax file was already loaded
- line 16: if version < 600
- line 17: syntax clear
- line 18: elseif exists("b:current_syntax")
- line 19: finish
- line 20: endif
- line 21:
- line 22: if version >= 600
- line 23: setlocal iskeyword=38,42,43,45,47-58,60-62,64-90,97-122,_
- line 24: else
- line 25: set iskeyword=38,42,43,45,47-58,60-62,64-90,97-122,_
- line 26: endif
- line 27:
- line 28: if exists("g:lispsyntax_ignorecase") || exists("g:lispsyntax_clisp")
- line 29: set ignorecase
- line 30: endif
- line 31:
- line 32: " ---------------------------------------------------------------------
- line 33: " Clusters: {{{1
- line 34: syn cluster^I^I^IlispAtomCluster^I^Icontains=lispAtomBarSymbol,lispAtomList,lispAtomNmbr0,lispComment,lispDecl,lispFunc,lispLeadWhite
- line 35: syn cluster^I^I^IlispBaseListCluster^Icontains=lispAtom,lispAtomBarSymbol,lispAtomMark,lispBQList,lispBarSymbol,lispComment,lispConcat,lispDecl,lispFunc,lispKey,lispList,lispNumber,lispEscapeSpecial,lispSymbol,lispVar,lispLeadWhite
- line 36: if exists("g:lisp_instring")
- line 37: syn cluster^I^I^IlispListCluster^I^Icontains=@lispBaseListCluster,lispString,lispInString,lispInStringString
- line 38: else
- line 39: syn cluster^I^I^IlispListCluster^I^Icontains=@lispBaseListCluster,lispString
- line 40: endif
- line 41:
- line 42: syn case ignore
- line 43:
- line 44: " ---------------------------------------------------------------------
- line 45: " Lists: {{{1
- line 46: syn match^I^I^IlispSymbol^I^I^Icontained^I^I^I![^()'`,"; \t]\+!
- line 47: syn match^I^I^IlispBarSymbol^I^I^Icontained^I^I^I!|..\{-}|!
- line 48: if exists("g:lisp_rainbow") && g:lisp_rainbow != 0
- line 49: syn region lispParen0 matchgroup=hlLevel0 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen1
- line 50: syn region lispParen1 contained matchgroup=hlLevel1 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen2
- line 51: syn region lispParen2 contained matchgroup=hlLevel2 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen3
- line 52: syn region lispParen3 contained matchgroup=hlLevel3 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen4
- line 53: syn region lispParen4 contained matchgroup=hlLevel4 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen5
- line 54: syn region lispParen5 contained matchgroup=hlLevel5 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen6
- line 55: syn region lispParen6 contained matchgroup=hlLevel6 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen7
- line 56: syn region lispParen7 contained matchgroup=hlLevel7 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen8
- line 57: syn region lispParen8 contained matchgroup=hlLevel8 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen9
- line 58: syn region lispParen9 contained matchgroup=hlLevel9 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen0
- line 59: else
- line 60: syn region lispList^I^I^Imatchgroup=Delimiter start="(" skip="|.\{-}|"^I^I^Imatchgroup=Delimiter end=")"^Icontains=@lispListCluster
- line 61: syn region lispBQList^I^I^Imatchgroup=PreProc start="`(" skip="|.\{-}|"^I^I^Imatchgroup=PreProc end=")"^I^Icontains=@lispListCluster
- line 62: endif
- line 63:
- line 64: " ---------------------------------------------------------------------
- line 65: " Atoms: {{{1
- line 66: syn match lispAtomMark^I^I^I"'"
- line 67: syn match lispAtom^I^I^I"'("me=e-1^I^I^Icontains=lispAtomMark^Inextgroup=lispAtomList
- line 68: syn match lispAtom^I^I^I"'[^ \t()]\+"^I^I^Icontains=lispAtomMark
- line 69: syn match lispAtomBarSymbol^I^I!'|..\{-}|!^I^I^Icontains=lispAtomMark
- line 70: syn region lispAtom^I^I^Istart=+'"+^I^I^Iskip=+\\"+ end=+"+
- line 71: syn region lispAtomList^I^I^Icontained^I^I^Imatchgroup=Special start="("^Iskip="|.\{-}|" matchgroup=Special end=")"^Icontains=@lispAtomCluster,lispString,lispEscapeSpecial
- line 72: syn match lispAtomNmbr^I^I^Icontained^I^I^I"\<\d\+"
- line 73: syn match lispLeadWhite^I^I^Icontained^I^I^I"^\s\+"
- line 74:
- line 75: " ---------------------------------------------------------------------
- line 76: " Standard Lisp Functions and Macros: {{{1
- line 77: syn keyword lispFunc^I^I*^I^I^I^Ifind-method^I^I^I^I^Ipprint-indent
- line 78: syn keyword lispFunc^I^I**^I^I^I^Ifind-package^I^I^I^I^Ipprint-linear
- line 79: syn keyword lispFunc^I^I***^I^I^I^Ifind-restart^I^I^I^I^Ipprint-logical-block
- line 80: syn keyword lispFunc^I^I+^I^I^I^Ifind-symbol^I^I^I^I^Ipprint-newline
- line 81: syn keyword lispFunc^I^I++^I^I^I^Ifinish-output^I^I^I^I^Ipprint-pop
- line 82: syn keyword lispFunc^I^I+++^I^I^I^Ifirst^I^I^I^I^I^Ipprint-tab
- line 83: syn keyword lispFunc^I^I-^I^I^I^Ifixnum^I^I^I^I^I^Ipprint-tabular
- line 84: syn keyword lispFunc^I^I/^I^I^I^Iflet^I^I^I^I^I^Iprin1
- line 85: syn keyword lispFunc^I^I//^I^I^I^Ifloat^I^I^I^I^I^Iprin1-to-string
- line 86: syn keyword lispFunc^I^I///^I^I^I^Ifloat-digits^I^I^I^I^Iprinc
- line 87: syn keyword lispFunc^I^I/=^I^I^I^Ifloat-precision^I^I^I^I^Iprinc-to-string
- line 88: syn keyword lispFunc^I^I1+^I^I^I^Ifloat-radix^I^I^I^I^Iprint
- line 89: syn keyword lispFunc^I^I1-^I^I^I^Ifloat-sign^I^I^I^I^Iprint-not-readable
- line 90: syn keyword lispFunc^I^I<^I^I^I^Ifloating-point-inexact^I^I^I^Iprint-not-readable-object
- line 91: syn keyword lispFunc^I^I<=^I^I^I^Ifloating-point-invalid-operation print-object
- line 92: syn keyword lispFunc^I^I=^I^I^I^Ifloating-point-overflow^I^I^I^Iprint-unreadable-object
- line 93: syn keyword lispFunc^I^I>^I^I^I^Ifloating-point-underflow^I^I^Iprobe-file
- line 94: syn keyword lispFunc^I^I>=^I^I^I^Ifloatp^I^I^I^I^I^Iproclaim
- line 95: syn keyword lispFunc^I^Iabort^I^I^I^Ifloor^I^I^I^I^I^Iprog
- line 96: syn keyword lispFunc^I^Iabs^I^I^I^Ifmakunbound^I^I^I^I^Iprog*
- line 97: syn keyword lispFunc^I^Iaccess^I^I^I^Iforce-output^I^I^I^I^Iprog1
- line 98: syn keyword lispFunc^I^Iacons^I^I^I^Iformat^I^I^I^I^I^Iprog2
- line 99: syn keyword lispFunc^I^Iacos^I^I^I^Iformatter^I^I^I^I^Iprogn
- line 100: syn keyword lispFunc^I^Iacosh^I^I^I^Ifourth^I^I^I^I^I^Iprogram-error
- line 101: syn keyword lispFunc^I^Iadd-method^I^I^Ifresh-line^I^I^I^I^Iprogv
- line 102: syn keyword lispFunc^I^Iadjoin^I^I^I^Ifround^I^I^I^I^I^Iprovide
- line 103: syn keyword lispFunc^I^Iadjust-array^I^I^Iftruncate^I^I^I^I^Ipsetf
- line 104: syn keyword lispFunc^I^Iadjustable-array-p^I^Iftype^I^I^I^I^I^Ipsetq
- line 105: syn keyword lispFunc^I^Iallocate-instance^I^Ifuncall^I^I^I^I^I^Ipush
- line 106: syn keyword lispFunc^I^Ialpha-char-p^I^I^Ifunction^I^I^I^I^Ipushnew
- line 107: syn keyword lispFunc^I^Ialphanumericp^I^I^Ifunction-keywords^I^I^I^Iputprop
- line 108: syn keyword lispFunc^I^Iand^I^I^I^Ifunction-lambda-expression^I^I^Iquote
- line 109: syn keyword lispFunc^I^Iappend^I^I^I^Ifunctionp^I^I^I^I^Irandom
- line 110: syn keyword lispFunc^I^Iapply^I^I^I^Igbitp^I^I^I^I^I^Irandom-state
- line 111: syn keyword lispFunc^I^Iapplyhook^I^I^Igcd^I^I^I^I^I^Irandom-state-p
- line 112: syn keyword lispFunc^I^Iapropos^I^I^I^Igeneric-function^I^I^I^Irassoc
- line 113: syn keyword lispFunc^I^Iapropos-list^I^I^Igensym^I^I^I^I^I^Irassoc-if
- line 114: syn keyword lispFunc^I^Iaref^I^I^I^Igentemp^I^I^I^I^I^Irassoc-if-not
- line 115: syn keyword lispFunc^I^Iarithmetic-error^I^Iget^I^I^I^I^I^Iratio
- line 116: syn keyword lispFunc^I^Iarithmetic-error-operands^Iget-decoded-time^I^I^I^Irational
- line 117: syn keyword lispFunc^I^Iarithmetic-error-operation^Iget-dispatch-macro-character^I^I^Irationalize
- line 118: syn keyword lispFunc^I^Iarray^I^I^I^Iget-internal-real-time^I^I^I^Irationalp
- line 119: syn keyword lispFunc^I^Iarray-dimension^I^I^Iget-internal-run-time^I^I^I^Iread
- line 120: syn keyword lispFunc^I^Iarray-dimension-limit^I^Iget-macro-character^I^I^I^Iread-byte
- line 121: syn keyword lispFunc^I^Iarray-dimensions^I^Iget-output-stream-string^I^I^Iread-char
- line 122: syn keyword lispFunc^I^Iarray-displacement^I^Iget-properties^I^I^I^I^Iread-char-no-hang
- line 123: syn keyword lispFunc^I^Iarray-element-type^I^Iget-setf-expansion^I^I^I^Iread-delimited-list
- line 124: syn keyword lispFunc^I^Iarray-has-fill-pointer-p^Iget-setf-method^I^I^I^I^Iread-eval-print
- line 125: syn keyword lispFunc^I^Iarray-in-bounds-p^I^Iget-universal-time^I^I^I^Iread-from-string
- line 126: syn keyword lispFunc^I^Iarray-rank^I^I^Igetf^I^I^I^I^I^Iread-line
- line 127: syn keyword lispFunc^I^Iarray-rank-limit^I^Igethash^I^I^I^I^I^Iread-preserving-whitespace
- line 128: syn keyword lispFunc^I^Iarray-row-major-index^I^Igo^I^I^I^I^I^Iread-sequence
- line 129: syn keyword lispFunc^I^Iarray-total-size^I^Igraphic-char-p^I^I^I^I^Ireader-error
- line 130: syn keyword lispFunc^I^Iarray-total-size-limit^I^Ihandler-bind^I^I^I^I^Ireadtable
- line 131: syn keyword lispFunc^I^Iarrayp^I^I^I^Ihandler-case^I^I^I^I^Ireadtable-case
- line 132: syn keyword lispFunc^I^Iash^I^I^I^Ihash-table^I^I^I^I^Ireadtablep
- line 133: syn keyword lispFunc^I^Iasin^I^I^I^Ihash-table-count^I^I^I^Ireal
- line 134: syn keyword lispFunc^I^Iasinh^I^I^I^Ihash-table-p^I^I^I^I^Irealp
- line 135: syn keyword lispFunc^I^Iassert^I^I^I^Ihash-table-rehash-size^I^I^I^Irealpart
- line 136: syn keyword lispFunc^I^Iassoc^I^I^I^Ihash-table-rehash-threshold^I^I^Ireduce
- line 137: syn keyword lispFunc^I^Iassoc-if^I^I^Ihash-table-size^I^I^I^I^Ireinitialize-instance
- line 138: syn keyword lispFunc^I^Iassoc-if-not^I^I^Ihash-table-test^I^I^I^I^Irem
- line 139: syn keyword lispFunc^I^Iatan^I^I^I^Ihost-namestring^I^I^I^I^Iremf
- line 140: syn keyword lispFunc^I^Iatanh^I^I^I^Iidentity^I^I^I^I^Iremhash
- line 141: syn keyword lispFunc^I^Iatom^I^I^I^Iif^I^I^I^I^I^Iremove
- line 142: syn keyword lispFunc^I^Ibase-char^I^I^Iif-exists^I^I^I^I^Iremove-duplicates
- line 143: syn keyword lispFunc^I^Ibase-string^I^I^Iignorable^I^I^I^I^Iremove-if
- line 144: syn keyword lispFunc^I^Ibignum^I^I^I^Iignore^I^I^I^I^I^Iremove-if-not
- line 145: syn keyword lispFunc^I^Ibit^I^I^I^Iignore-errors^I^I^I^I^Iremove-method
- line 146: syn keyword lispFunc^I^Ibit-and^I^I^I^Iimagpart^I^I^I^I^Iremprop
- line 147: syn keyword lispFunc^I^Ibit-andc1^I^I^Iimport^I^I^I^I^I^Irename-file
- line 148: syn keyword lispFunc^I^Ibit-andc2^I^I^Iin-package^I^I^I^I^Irename-package
- line 149: syn keyword lispFunc^I^Ibit-eqv^I^I^I^Iin-package^I^I^I^I^Ireplace
- line 150: syn keyword lispFunc^I^Ibit-ior^I^I^I^Iincf^I^I^I^I^I^Irequire
- line 151: syn keyword lispFunc^I^Ibit-nand^I^I^Iinitialize-instance^I^I^I^Irest
- line 152: syn keyword lispFunc^I^Ibit-nor^I^I^I^Iinline^I^I^I^I^I^Irestart
- line 153: syn keyword lispFunc^I^Ibit-not^I^I^I^Iinput-stream-p^I^I^I^I^Irestart-bind
- line 154: syn keyword lispFunc^I^Ibit-orc1^I^I^Iinspect^I^I^I^I^I^Irestart-case
- line 155: syn keyword lispFunc^I^Ibit-orc2^I^I^Iint-char^I^I^I^I^Irestart-name
- line 156: syn keyword lispFunc^I^Ibit-vector^I^I^Iinteger^I^I^I^I^I^Ireturn
- line 157: syn keyword lispFunc^I^Ibit-vector-p^I^I^Iinteger-decode-float^I^I^I^Ireturn-from
- line 158: syn keyword lispFunc^I^Ibit-xor^I^I^I^Iinteger-length^I^I^I^I^Irevappend
- line 159: syn keyword lispFunc^I^Iblock^I^I^I^Iintegerp^I^I^I^I^Ireverse
- line 160: syn keyword lispFunc^I^Iboole^I^I^I^Iinteractive-stream-p^I^I^I^Iroom
- line 161: syn keyword lispFunc^I^Iboole-1^I^I^I^Iintern^I^I^I^I^I^Irotatef
- line 162: syn keyword lispFunc^I^Iboole-2^I^I^I^Iinternal-time-units-per-second^I^I^Iround
- line 163: syn keyword lispFunc^I^Iboole-and^I^I^Iintersection^I^I^I^I^Irow-major-aref
- line 164: syn keyword lispFunc^I^Iboole-andc1^I^I^Iinvalid-method-error^I^I^I^Irplaca
- line 165: syn keyword lispFunc^I^Iboole-andc2^I^I^Iinvoke-debugger^I^I^I^I^Irplacd
- line 166: syn keyword lispFunc^I^Iboole-c1^I^I^Iinvoke-restart^I^I^I^I^Isafety
- line 167: syn keyword lispFunc^I^Iboole-c2^I^I^Iinvoke-restart-interactively^I^I^Isatisfies
- line 168: syn keyword lispFunc^I^Iboole-clr^I^I^Iisqrt^I^I^I^I^I^Isbit
- line 169: syn keyword lispFunc^I^Iboole-eqv^I^I^Ikeyword^I^I^I^I^I^Iscale-float
- line 170: syn keyword lispFunc^I^Iboole-ior^I^I^Ikeywordp^I^I^I^I^Ischar
- line 171: syn keyword lispFunc^I^Iboole-nand^I^I^Ilabels^I^I^I^I^I^Isearch
- line 172: syn keyword lispFunc^I^Iboole-nor^I^I^Ilambda^I^I^I^I^I^Isecond
- line 173: syn keyword lispFunc^I^Iboole-orc1^I^I^Ilambda-list-keywords^I^I^I^Isequence
- line 174: syn keyword lispFunc^I^Iboole-orc2^I^I^Ilambda-parameters-limit^I^I^I^Iserious-condition
- line 175: syn keyword lispFunc^I^Iboole-set^I^I^Ilast^I^I^I^I^I^Iset
- line 176: syn keyword lispFunc^I^Iboole-xor^I^I^Ilcm^I^I^I^I^I^Iset-char-bit
- line 177: syn keyword lispFunc^I^Iboolean^I^I^I^Ildb^I^I^I^I^I^Iset-difference
- line 178: syn keyword lispFunc^I^Iboth-case-p^I^I^Ildb-test^I^I^I^I^Iset-dispatch-macro-character
- line 179: syn keyword lispFunc^I^Iboundp^I^I^I^Ildiff^I^I^I^I^I^Iset-exclusive-or
- line 180: syn keyword lispFunc^I^Ibreak^I^I^I^Ileast-negative-double-float^I^I^Iset-macro-character
- line 181: syn keyword lispFunc^I^Ibroadcast-stream^I^Ileast-negative-long-float^I^I^Iset-pprint-dispatch
- line 182: syn keyword lispFunc^I^Ibroadcast-stream-streams^Ileast-negative-normalized-double-float^I^Iset-syntax-from-char
- line 183: syn keyword lispFunc^I^Ibuilt-in-class^I^I^Ileast-negative-normalized-long-float^I^Isetf
- line 184: syn keyword lispFunc^I^Ibutlast^I^I^I^Ileast-negative-normalized-short-float^I^Isetq
- line 185: syn keyword lispFunc^I^Ibyte^I^I^I^Ileast-negative-normalized-single-float^I^Iseventh
- line 186: syn keyword lispFunc^I^Ibyte-position^I^I^Ileast-negative-short-float^I^I^Ishadow
- line 187: syn keyword lispFunc^I^Ibyte-size^I^I^Ileast-negative-single-float^I^I^Ishadowing-import
- line 188: syn keyword lispFunc^I^Icall-arguments-limit^I^Ileast-positive-double-float^I^I^Ishared-initialize
- line 189: syn keyword lispFunc^I^Icall-method^I^I^Ileast-positive-long-float^I^I^Ishiftf
- line 190: syn keyword lispFunc^I^Icall-next-method^I^Ileast-positive-normalized-double-float^I^Ishort-float
- line 191: syn keyword lispFunc^I^Icapitalize^I^I^Ileast-positive-normalized-long-float^I^Ishort-float-epsilon
- line 192: syn keyword lispFunc^I^Icar^I^I^I^Ileast-positive-normalized-short-float^I^Ishort-float-negative-epsilon
- line 193: syn keyword lispFunc^I^Icase^I^I^I^Ileast-positive-normalized-single-float^I^Ishort-site-name
- line 194: syn keyword lispFunc^I^Icatch^I^I^I^Ileast-positive-short-float^I^I^Isignal
- line 195: syn keyword lispFunc^I^Iccase^I^I^I^Ileast-positive-single-float^I^I^Isigned-byte
- line 196: syn keyword lispFunc^I^Icdr^I^I^I^Ilength^I^I^I^I^I^Isignum
- line 197: syn keyword lispFunc^I^Iceiling^I^I^I^Ilet^I^I^I^I^I^Isimple-condition
- line 198: syn keyword lispFunc^I^Icell-error^I^I^Ilet*^I^I^I^I^I^Isimple-array
- line 199: syn keyword lispFunc^I^Icell-error-name^I^I^Ilisp^I^I^I^I^I^Isimple-base-string
- line 200: syn keyword lispFunc^I^Icerror^I^I^I^Ilisp-implementation-type^I^I^Isimple-bit-vector
- line 201: syn keyword lispFunc^I^Ichange-class^I^I^Ilisp-implementation-version^I^I^Isimple-bit-vector-p
- line 202: syn keyword lispFunc^I^Ichar^I^I^I^Ilist^I^I^I^I^I^Isimple-condition-format-arguments
- line 203: syn keyword lispFunc^I^Ichar-bit^I^I^Ilist*^I^I^I^I^I^Isimple-condition-format-control
- line 204: syn keyword lispFunc^I^Ichar-bits^I^I^Ilist-all-packages^I^I^I^Isimple-error
- line 205: syn keyword lispFunc^I^Ichar-bits-limit^I^I^Ilist-length^I^I^I^I^Isimple-string
- line 206: syn keyword lispFunc^I^Ichar-code^I^I^Ilisten^I^I^I^I^I^Isimple-string-p
- line 207: syn keyword lispFunc^I^Ichar-code-limit^I^I^Ilistp^I^I^I^I^I^Isimple-type-error
- line 208: syn keyword lispFunc^I^Ichar-control-bit^I^Iload^I^I^I^I^I^Isimple-vector
- line 209: syn keyword lispFunc^I^Ichar-downcase^I^I^Iload-logical-pathname-translations^I^Isimple-vector-p
- line 210: syn keyword lispFunc^I^Ichar-equal^I^I^Iload-time-value^I^I^I^I^Isimple-warning
- line 211: syn keyword lispFunc^I^Ichar-font^I^I^Ilocally^I^I^I^I^I^Isin
- line 212: syn keyword lispFunc^I^Ichar-font-limit^I^I^Ilog^I^I^I^I^I^Isingle-flaot-epsilon
- line 213: syn keyword lispFunc^I^Ichar-greaterp^I^I^Ilogand^I^I^I^I^I^Isingle-float
- line 214: syn keyword lispFunc^I^Ichar-hyper-bit^I^I^Ilogandc1^I^I^I^I^Isingle-float-epsilon
- line 215: syn keyword lispFunc^I^Ichar-int^I^I^Ilogandc2^I^I^I^I^Isingle-float-negative-epsilon
- line 216: syn keyword lispFunc^I^Ichar-lessp^I^I^Ilogbitp^I^I^I^I^I^Isinh
- line 217: syn keyword lispFunc^I^Ichar-meta-bit^I^I^Ilogcount^I^I^I^I^Isixth
- line 218: syn keyword lispFunc^I^Ichar-name^I^I^Ilogeqv^I^I^I^I^I^Isleep
- line 219: syn keyword lispFunc^I^Ichar-not-equal^I^I^Ilogical-pathname^I^I^I^Islot-boundp
- line 220: syn keyword lispFunc^I^Ichar-not-greaterp^I^Ilogical-pathname-translations^I^I^Islot-exists-p
- line 221: syn keyword lispFunc^I^Ichar-not-lessp^I^I^Ilogior^I^I^I^I^I^Islot-makunbound
- line 222: syn keyword lispFunc^I^Ichar-super-bit^I^I^Ilognand^I^I^I^I^I^Islot-missing
- line 223: syn keyword lispFunc^I^Ichar-upcase^I^I^Ilognor^I^I^I^I^I^Islot-unbound
- line 224: syn keyword lispFunc^I^Ichar/=^I^I^I^Ilognot^I^I^I^I^I^Islot-value
- line 225: syn keyword lispFunc^I^Ichar<^I^I^I^Ilogorc1^I^I^I^I^I^Isoftware-type
- line 226: syn keyword lispFunc^I^Ichar<=^I^I^I^Ilogorc2^I^I^I^I^I^Isoftware-version
- line 227: syn keyword lispFunc^I^Ichar=^I^I^I^Ilogtest^I^I^I^I^I^Isome
- line 228: syn keyword lispFunc^I^Ichar>^I^I^I^Ilogxor^I^I^I^I^I^Isort
- line 229: syn keyword lispFunc^I^Ichar>=^I^I^I^Ilong-float^I^I^I^I^Ispace
- line 230: syn keyword lispFunc^I^Icharacter^I^I^Ilong-float-epsilon^I^I^I^Ispecial
- line 231: syn keyword lispFunc^I^Icharacterp^I^I^Ilong-float-negative-epsilon^I^I^Ispecial-form-p
- line 232: syn keyword lispFunc^I^Icheck-type^I^I^Ilong-site-name^I^I^I^I^Ispecial-operator-p
- line 233: syn keyword lispFunc^I^Icis^I^I^I^Iloop^I^I^I^I^I^Ispeed
- line 234: syn keyword lispFunc^I^Iclass^I^I^I^Iloop-finish^I^I^I^I^Isqrt
- line 235: syn keyword lispFunc^I^Iclass-name^I^I^Ilower-case-p^I^I^I^I^Istable-sort
- line 236: syn keyword lispFunc^I^Iclass-of^I^I^Imachine-instance^I^I^I^Istandard
- line 237: syn keyword lispFunc^I^Iclear-input^I^I^Imachine-type^I^I^I^I^Istandard-char
- line 238: syn keyword lispFunc^I^Iclear-output^I^I^Imachine-version^I^I^I^I^Istandard-char-p
- line 239: syn keyword lispFunc^I^Iclose^I^I^I^Imacro-function^I^I^I^I^Istandard-class
- line 240: syn keyword lispFunc^I^Iclrhash^I^I^I^Imacroexpand^I^I^I^I^Istandard-generic-function
- line 241: syn keyword lispFunc^I^Icode-char^I^I^Imacroexpand-1^I^I^I^I^Istandard-method
- line 242: syn keyword lispFunc^I^Icoerce^I^I^I^Imacroexpand-l^I^I^I^I^Istandard-object
- line 243: syn keyword lispFunc^I^Icommonp^I^I^I^Imacrolet^I^I^I^I^Istep
- line 244: syn keyword lispFunc^I^Icompilation-speed^I^Imake-array^I^I^I^I^Istorage-condition
- line 245: syn keyword lispFunc^I^Icompile^I^I^I^Imake-array^I^I^I^I^Istore-value
- line 246: syn keyword lispFunc^I^Icompile-file^I^I^Imake-broadcast-stream^I^I^I^Istream
- line 247: syn keyword lispFunc^I^Icompile-file-pathname^I^Imake-char^I^I^I^I^Istream-element-type
- line 248: syn keyword lispFunc^I^Icompiled-function^I^Imake-concatenated-stream^I^I^Istream-error
- line 249: syn keyword lispFunc^I^Icompiled-function-p^I^Imake-condition^I^I^I^I^Istream-error-stream
- line 250: syn keyword lispFunc^I^Icompiler-let^I^I^Imake-dispatch-macro-character^I^I^Istream-external-format
- line 251: syn keyword lispFunc^I^Icompiler-macro^I^I^Imake-echo-stream^I^I^I^Istreamp
- line 252: syn keyword lispFunc^I^Icompiler-macro-function^Imake-hash-table^I^I^I^I^I^Istreamup
- line 253: syn keyword lispFunc^I^Icomplement^I^I^Imake-instance^I^I^I^I^Istring
- line 254: syn keyword lispFunc^I^Icomplex^I^I^I^Imake-instances-obsolete^I^I^I^Istring-capitalize
- line 255: syn keyword lispFunc^I^Icomplexp^I^I^Imake-list^I^I^I^I^Istring-char
- line 256: syn keyword lispFunc^I^Icompute-applicable-methods^Imake-load-form^I^I^I^I^Istring-char-p
- line 257: syn keyword lispFunc^I^Icompute-restarts^I^Imake-load-form-saving-slots^I^I^Istring-downcase
- line 258: syn keyword lispFunc^I^Iconcatenate^I^I^Imake-method^I^I^I^I^Istring-equal
- line 259: syn keyword lispFunc^I^Iconcatenated-stream^I^Imake-package^I^I^I^I^Istring-greaterp
- line 260: syn keyword lispFunc^I^Iconcatenated-stream-streams^Imake-pathname^I^I^I^I^Istring-left-trim
- line 261: syn keyword lispFunc^I^Icond^I^I^I^Imake-random-state^I^I^I^Istring-lessp
- line 262: syn keyword lispFunc^I^Icondition^I^I^Imake-sequence^I^I^I^I^Istring-not-equal
- line 263: syn keyword lispFunc^I^Iconjugate^I^I^Imake-string^I^I^I^I^Istring-not-greaterp
- line 264: syn keyword lispFunc^I^Icons^I^I^I^Imake-string-input-stream^I^I^Istring-not-lessp
- line 265: syn keyword lispFunc^I^Iconsp^I^I^I^Imake-string-output-stream^I^I^Istring-right-strim
- line 266: syn keyword lispFunc^I^Iconstantly^I^I^Imake-symbol^I^I^I^I^Istring-right-trim
- line 267: syn keyword lispFunc^I^Iconstantp^I^I^Imake-synonym-stream^I^I^I^Istring-stream
- line 268: syn keyword lispFunc^I^Icontinue^I^I^Imake-two-way-stream^I^I^I^Istring-trim
- line 269: syn keyword lispFunc^I^Icontrol-error^I^I^Imakunbound^I^I^I^I^Istring-upcase
- line 270: syn keyword lispFunc^I^Icopy-alist^I^I^Imap^I^I^I^I^I^Istring/=
- line 271: syn keyword lispFunc^I^Icopy-list^I^I^Imap-into^I^I^I^I^Istring<
- line 272: syn keyword lispFunc^I^Icopy-pprint-dispatch^I^Imapc^I^I^I^I^I^Istring<=
- line 273: syn keyword lispFunc^I^Icopy-readtable^I^I^Imapcan^I^I^I^I^I^Istring=
- line 274: syn keyword lispFunc^I^Icopy-seq^I^I^Imapcar^I^I^I^I^I^Istring>
- line 275: syn keyword lispFunc^I^Icopy-structure^I^I^Imapcon^I^I^I^I^I^Istring>=
- line 276: syn keyword lispFunc^I^Icopy-symbol^I^I^Imaphash^I^I^I^I^I^Istringp
- line 277: syn keyword lispFunc^I^Icopy-tree^I^I^Imapl^I^I^I^I^I^Istructure
- line 278: syn keyword lispFunc^I^Icos^I^I^I^Imaplist^I^I^I^I^I^Istructure-class
- line 279: syn keyword lispFunc^I^Icosh^I^I^I^Imask-field^I^I^I^I^Istructure-object
- line 280: syn keyword lispFunc^I^Icount^I^I^I^Imax^I^I^I^I^I^Istyle-warning
- line 281: syn keyword lispFunc^I^Icount-if^I^I^Imember^I^I^I^I^I^Isublim
- line 282: syn keyword lispFunc^I^Icount-if-not^I^I^Imember-if^I^I^I^I^Isublis
- line 283: syn keyword lispFunc^I^Ictypecase^I^I^Imember-if-not^I^I^I^I^Isubseq
- line 284: syn keyword lispFunc^I^Idebug^I^I^I^Imerge^I^I^I^I^I^Isubsetp
- line 285: syn keyword lispFunc^I^Idecf^I^I^I^Imerge-pathname^I^I^I^I^Isubst
- line 286: syn keyword lispFunc^I^Ideclaim^I^I^I^Imerge-pathnames^I^I^I^I^Isubst-if
- line 287: syn keyword lispFunc^I^Ideclaration^I^I^Imethod^I^I^I^I^I^Isubst-if-not
- line 288: syn keyword lispFunc^I^Ideclare^I^I^I^Imethod-combination^I^I^I^Isubstitute
- line 289: syn keyword lispFunc^I^Idecode-float^I^I^Imethod-combination-error^I^I^Isubstitute-if
- line 290: syn keyword lispFunc^I^Idecode-universal-time^I^Imethod-qualifiers^I^I^I^Isubstitute-if-not
- line 291: syn keyword lispFunc^I^Idefclass^I^I^Imin^I^I^I^I^I^Isubtypep
- line 292: syn keyword lispFunc^I^Idefconstant^I^I^Iminusp^I^I^I^I^I^Isvref
- line 293: syn keyword lispFunc^I^Idefgeneric^I^I^Imismatch^I^I^I^I^Isxhash
- line 294: syn keyword lispFunc^I^Idefine-compiler-macro^I^Imod^I^I^I^I^I^Isymbol
- line 295: syn keyword lispFunc^I^Idefine-condition^I^Imost-negative-double-float^I^I^Isymbol-function
- line 296: syn keyword lispFunc^I^Idefine-method-combination^Imost-negative-fixnum^I^I^I^Isymbol-macrolet
- line 297: syn keyword lispFunc^I^Idefine-modify-macro^I^Imost-negative-long-float^I^I^Isymbol-name
- line 298: syn keyword lispFunc^I^Idefine-setf-expander^I^Imost-negative-short-float^I^I^Isymbol-package
- line 299: syn keyword lispFunc^I^Idefine-setf-method^I^Imost-negative-single-float^I^I^Isymbol-plist
- line 300: syn keyword lispFunc^I^Idefine-symbol-macro^I^Imost-positive-double-float^I^I^Isymbol-value
- line 301: syn keyword lispFunc^I^Idefmacro^I^I^Imost-positive-fixnum^I^I^I^Isymbolp
- line 302: syn keyword lispFunc^I^Idefmethod^I^I^Imost-positive-long-float^I^I^Isynonym-stream
- line 303: syn keyword lispFunc^I^Idefpackage^I^I^Imost-positive-short-float^I^I^Isynonym-stream-symbol
- line 304: syn keyword lispFunc^I^Idefparameter^I^I^Imost-positive-single-float^I^I^Isys
- line 305: syn keyword lispFunc^I^Idefsetf^I^I^I^Imuffle-warning^I^I^I^I^Isystem
- line 306: syn keyword lispFunc^I^Idefstruct^I^I^Imultiple-value-bind^I^I^I^It
- line 307: syn keyword lispFunc^I^Ideftype^I^I^I^Imultiple-value-call^I^I^I^Itagbody
- line 308: syn keyword lispFunc^I^Idefun^I^I^I^Imultiple-value-list^I^I^I^Itailp
- line 309: syn keyword lispFunc^I^Idefvar^I^I^I^Imultiple-value-prog1^I^I^I^Itan
- line 310: syn keyword lispFunc^I^Idelete^I^I^I^Imultiple-value-seteq^I^I^I^Itanh
- line 311: syn keyword lispFunc^I^Idelete-duplicates^I^Imultiple-value-setq^I^I^I^Itenth
- line 312: syn keyword lispFunc^I^Idelete-file^I^I^Imultiple-values-limit^I^I^I^Iterpri
- line 313: syn keyword lispFunc^I^Idelete-if^I^I^Iname-char^I^I^I^I^Ithe
- line 314: syn keyword lispFunc^I^Idelete-if-not^I^I^Inamestring^I^I^I^I^Ithird
- line 315: syn keyword lispFunc^I^Idelete-package^I^I^Inbutlast^I^I^I^I^Ithrow
- line 316: syn keyword lispFunc^I^Idenominator^I^I^Inconc^I^I^I^I^I^Itime
- line 317: syn keyword lispFunc^I^Ideposit-field^I^I^Inext-method-p^I^I^I^I^Itrace
- line 318: syn keyword lispFunc^I^Idescribe^I^I^Inil^I^I^I^I^I^Itranslate-logical-pathname
- line 319: syn keyword lispFunc^I^Idescribe-object^I^I^Inintersection^I^I^I^I^Itranslate-pathname
- line 320: syn keyword lispFunc^I^Idestructuring-bind^I^Ininth^I^I^I^I^I^Itree-equal
- line 321: syn keyword lispFunc^I^Idigit-char^I^I^Ino-applicable-method^I^I^I^Itruename
- line 322: syn keyword lispFunc^I^Idigit-char-p^I^I^Ino-next-method^I^I^I^I^Itruncase
- line 323: syn keyword lispFunc^I^Idirectory^I^I^Inot^I^I^I^I^I^Itruncate
- line 324: syn keyword lispFunc^I^Idirectory-namestring^I^Inotany^I^I^I^I^I^Itwo-way-stream
- line 325: syn keyword lispFunc^I^Idisassemble^I^I^Inotevery^I^I^I^I^Itwo-way-stream-input-stream
- line 326: syn keyword lispFunc^I^Idivision-by-zero^I^Inotinline^I^I^I^I^Itwo-way-stream-output-stream
- line 327: syn keyword lispFunc^I^Ido^I^I^I^Inreconc^I^I^I^I^I^Itype
- line 328: syn keyword lispFunc^I^Ido*^I^I^I^Inreverse^I^I^I^I^Itype-error
- line 329: syn keyword lispFunc^I^Ido-all-symbols^I^I^Inset-difference^I^I^I^I^Itype-error-datum
- line 330: syn keyword lispFunc^I^Ido-exeternal-symbols^I^Inset-exclusive-or^I^I^I^Itype-error-expected-type
- line 331: syn keyword lispFunc^I^Ido-external-symbols^I^Instring^I^I^I^I^I^Itype-of
- line 332: syn keyword lispFunc^I^Ido-symbols^I^I^Instring-capitalize^I^I^I^Itypecase
- line 333: syn keyword lispFunc^I^Idocumentation^I^I^Instring-downcase^I^I^I^Itypep
- line 334: syn keyword lispFunc^I^Idolist^I^I^I^Instring-upcase^I^I^I^I^Iunbound-slot
- line 335: syn keyword lispFunc^I^Idotimes^I^I^I^Insublis^I^I^I^I^I^Iunbound-slot-instance
- line 336: syn keyword lispFunc^I^Idouble-float^I^I^Insubst^I^I^I^I^I^Iunbound-variable
- line 337: syn keyword lispFunc^I^Idouble-float-epsilon^I^Insubst-if^I^I^I^I^Iundefined-function
- line 338: syn keyword lispFunc^I^Idouble-float-negative-epsilon^Insubst-if-not^I^I^I^I^Iunexport
- line 339: syn keyword lispFunc^I^Idpb^I^I^I^Insubstitute^I^I^I^I^Iunintern
- line 340: syn keyword lispFunc^I^Idribble^I^I^I^Insubstitute-if^I^I^I^I^Iunion
- line 341: syn keyword lispFunc^I^Idynamic-extent^I^I^Insubstitute-if-not^I^I^I^Iunless
- line 342: syn keyword lispFunc^I^Iecase^I^I^I^Inth^I^I^I^I^I^Iunread
- line 343: syn keyword lispFunc^I^Iecho-stream^I^I^Inth-value^I^I^I^I^Iunread-char
- line 344: syn keyword lispFunc^I^Iecho-stream-input-stream^Inthcdr^I^I^I^I^I^Iunsigned-byte
- line 345: syn keyword lispFunc^I^Iecho-stream-output-stream^Inull^I^I^I^I^I^Iuntrace
- line 346: syn keyword lispFunc^I^Ied^I^I^I^Inumber^I^I^I^I^I^Iunuse-package
- line 347: syn keyword lispFunc^I^Ieighth^I^I^I^Inumberp^I^I^I^I^I^Iunwind-protect
- line 348: syn keyword lispFunc^I^Ielt^I^I^I^Inumerator^I^I^I^I^Iupdate-instance-for-different-class
- line 349: syn keyword lispFunc^I^Iencode-universal-time^I^Inunion^I^I^I^I^I^Iupdate-instance-for-redefined-class
- line 350: syn keyword lispFunc^I^Iend-of-file^I^I^Ioddp^I^I^I^I^I^Iupgraded-array-element-type
- line 351: syn keyword lispFunc^I^Iendp^I^I^I^Iopen^I^I^I^I^I^Iupgraded-complex-part-type
- line 352: syn keyword lispFunc^I^Ienough-namestring^I^Iopen-stream-p^I^I^I^I^Iupper-case-p
- line 353: syn keyword lispFunc^I^Iensure-directories-exist^Ioptimize^I^I^I^I^Iuse-package
- line 354: syn keyword lispFunc^I^Iensure-generic-function^Ior^I^I^I^I^I^I^Iuse-value
- line 355: syn keyword lispFunc^I^Ieq^I^I^I^Iotherwise^I^I^I^I^Iuser
- line 356: syn keyword lispFunc^I^Ieql^I^I^I^Ioutput-stream-p^I^I^I^I^Iuser-homedir-pathname
- line 357: syn keyword lispFunc^I^Iequal^I^I^I^Ipackage^I^I^I^I^I^Ivalues
- line 358: syn keyword lispFunc^I^Iequalp^I^I^I^Ipackage-error^I^I^I^I^Ivalues-list
- line 359: syn keyword lispFunc^I^Ierror^I^I^I^Ipackage-error-package^I^I^I^Ivector
- line 360: syn keyword lispFunc^I^Ietypecase^I^I^Ipackage-name^I^I^I^I^Ivector-pop
- line 361: syn keyword lispFunc^I^Ieval^I^I^I^Ipackage-nicknames^I^I^I^Ivector-push
- line 362: syn keyword lispFunc^I^Ieval-when^I^I^Ipackage-shadowing-symbols^I^I^Ivector-push-extend
- line 363: syn keyword lispFunc^I^Ievalhook^I^I^Ipackage-use-list^I^I^I^Ivectorp
- line 364: syn keyword lispFunc^I^Ievenp^I^I^I^Ipackage-used-by-list^I^I^I^Iwarn
- line 365: syn keyword lispFunc^I^Ievery^I^I^I^Ipackagep^I^I^I^I^Iwarning
- line 366: syn keyword lispFunc^I^Iexp^I^I^I^Ipairlis^I^I^I^I^I^Iwhen
- line 367: syn keyword lispFunc^I^Iexport^I^I^I^Iparse-error^I^I^I^I^Iwild-pathname-p
- line 368: syn keyword lispFunc^I^Iexpt^I^I^I^Iparse-integer^I^I^I^I^Iwith-accessors
- line 369: syn keyword lispFunc^I^Iextended-char^I^I^Iparse-namestring^I^I^I^Iwith-compilation-unit
- line 370: syn keyword lispFunc^I^Ifboundp^I^I^I^Ipathname^I^I^I^I^Iwith-condition-restarts
- line 371: syn keyword lispFunc^I^Ifceiling^I^I^Ipathname-device^I^I^I^I^Iwith-hash-table-iterator
- line 372: syn keyword lispFunc^I^Ifdefinition^I^I^Ipathname-directory^I^I^I^Iwith-input-from-string
- line 373: syn keyword lispFunc^I^Iffloor^I^I^I^Ipathname-host^I^I^I^I^Iwith-open-file
- line 374: syn keyword lispFunc^I^Ififth^I^I^I^Ipathname-match-p^I^I^I^Iwith-open-stream
- line 375: syn keyword lispFunc^I^Ifile-author^I^I^Ipathname-name^I^I^I^I^Iwith-output-to-string
- line 376: syn keyword lispFunc^I^Ifile-error^I^I^Ipathname-type^I^I^I^I^Iwith-package-iterator
- line 377: syn keyword lispFunc^I^Ifile-error-pathname^I^Ipathname-version^I^I^I^Iwith-simple-restart
- line 378: syn keyword lispFunc^I^Ifile-length^I^I^Ipathnamep^I^I^I^I^Iwith-slots
- line 379: syn keyword lispFunc^I^Ifile-namestring^I^I^Ipeek-char^I^I^I^I^Iwith-standard-io-syntax
- line 380: syn keyword lispFunc^I^Ifile-position^I^I^Iphase^I^I^I^I^I^Iwrite
- line 381: syn keyword lispFunc^I^Ifile-stream^I^I^Ipi^I^I^I^I^I^Iwrite-byte
- line 382: syn keyword lispFunc^I^Ifile-string-length^I^Iplusp^I^I^I^I^I^Iwrite-char
- line 383: syn keyword lispFunc^I^Ifile-write-date^I^I^Ipop^I^I^I^I^I^Iwrite-line
- line 384: syn keyword lispFunc^I^Ifill^I^I^I^Iposition^I^I^I^I^Iwrite-sequence
- line 385: syn keyword lispFunc^I^Ifill-pointer^I^I^Iposition-if^I^I^I^I^Iwrite-string
- line 386: syn keyword lispFunc^I^Ifind^I^I^I^Iposition-if-not^I^I^I^I^Iwrite-to-string
- line 387: syn keyword lispFunc^I^Ifind-all-symbols^I^Ipprint^I^I^I^I^I^Iy-or-n-p
- line 388: syn keyword lispFunc^I^Ifind-class^I^I^Ipprint-dispatch^I^I^I^I^Iyes-or-no-p
- line 389: syn keyword lispFunc^I^Ifind-if^I^I^I^Ipprint-exit-if-list-exhausted^I^I^Izerop
- line 390: syn keyword lispFunc^I^Ifind-if-not^I^I^Ipprint-fill
- line 391:
- line 392: syn match lispFunc^I^I"\<c[ad]\+r\>"
- line 393: if exists("g:lispsyntax_clisp")
- line 394: " CLISP FFI:
- line 395: syn match lispFunc^I"\<\(ffi:\)\?with-c-\(place\|var\)\>"
- line 396: syn match lispFunc^I"\<\(ffi:\)\?with-foreign-\(object\|string\)\>"
- line 397: syn match lispFunc^I"\<\(ffi:\)\?default-foreign-\(language\|library\)\>"
- line 398: syn match lispFunc^I"\<\([us]_\?\)\?\(element\|deref\|cast\|slot\|validp\)\>"
- line 399: syn match lispFunc^I"\<\(ffi:\)\?set-foreign-pointer\>"
- line 400: syn match lispFunc^I"\<\(ffi:\)\?allocate-\(deep\|shallow\)\>"
- line 401: syn match lispFunc^I"\<\(ffi:\)\?c-lines\>"
- line 402: syn match lispFunc^I"\<\(ffi:\)\?foreign-\(value\|free\|variable\|function\|object\)\>"
- line 403: syn match lispFunc^I"\<\(ffi:\)\?foreign-address\(-null\|unsigned\)\?\>"
- line 404: syn match lispFunc^I"\<\(ffi:\)\?undigned-foreign-address\>"
- line 405: syn match lispFunc^I"\<\(ffi:\)\?c-var-\(address\|object\)\>"
- line 406: syn match lispFunc^I"\<\(ffi:\)\?typeof\>"
- line 407: syn match lispFunc^I"\<\(ffi:\)\?\(bit\)\?sizeof\>"
- line 408: " CLISP Macros, functions et al:
- line 409: syn match lispFunc^I"\<\(ext:\)\?with-collect\>"
- line 410: syn match lispFunc^I"\<\(ext:\)\?letf\*\?\>"
- line 411: syn match lispFunc^I"\<\(ext:\)\?finalize\>\>"
- line 412: syn match lispFunc^I"\<\(ext:\)\?memoized\>"
- line 413: syn match lispFunc^I"\<\(ext:\)\?getenv\>"
- line 414: syn match lispFunc^I"\<\(ext:\)\?convert-string-\(to\|from\)-bytes\>"
- line 415: syn match lispFunc^I"\<\(ext:\)\?ethe\>"
- line 416: syn match lispFunc^I"\<\(ext:\)\?with-gensyms\>"
- line 417: syn match lispFunc^I"\<\(ext:\)\?open-http\>"
- line 418: syn match lispFunc^I"\<\(ext:\)\?string-concat\>"
- line 419: syn match lispFunc^I"\<\(ext:\)\?with-http-\(in\|out\)put\>"
- line 420: syn match lispFunc^I"\<\(ext:\)\?with-html-output\>"
- line 421: syn match lispFunc^I"\<\(ext:\)\?expand-form\>"
- line 422: syn match lispFunc^I"\<\(ext:\)\?\(without-\)\?package-lock\>"
- line 423: syn match lispFunc^I"\<\(ext:\)\?re-export\>"
- line 424: syn match lispFunc^I"\<\(ext:\)\?saveinitmem\>"
- line 425: syn match lispFunc^I"\<\(ext:\)\?\(read\|write\)-\(integer\|float\)\>"
- line 426: syn match lispFunc^I"\<\(ext:\)\?\(read\|write\)-\(char\|byte\)-sequence\>"
- line 427: syn match lispFunc^I"\<\(custom:\)\?\*system-package-list\*\>"
- line 428: syn match lispFunc^I"\<\(custom:\)\?\*ansi\*\>"
- line 429: endif
- line 430:
- line 431: " ---------------------------------------------------------------------
- line 432: " Lisp Keywords (modifiers): {{{1
- line 433: syn keyword lispKey^I^I:abort^I^I^I^I:from-end^I^I^I:overwrite
- line 434: syn keyword lispKey^I^I:adjustable^I^I^I:gensym^I^I^I^I:predicate
- line 435: syn keyword lispKey^I^I:append^I^I^I^I:host^I^I^I^I:preserve-whitespace
- line 436: syn keyword lispKey^I^I:array^I^I^I^I:if-does-not-exist^I^I:pretty
- line 437: syn keyword lispKey^I^I:base^I^I^I^I:if-exists^I^I^I:print
- line 438: syn keyword lispKey^I^I:case^I^I^I^I:include^I^I^I:print-function
- line 439: syn keyword lispKey^I^I:circle^I^I^I^I:index^I^I^I^I:probe
- line 440: syn keyword lispKey^I^I:conc-name^I^I^I:inherited^I^I^I:radix
- line 441: syn keyword lispKey^I^I:constructor^I^I^I:initial-contents^I^I:read-only
- line 442: syn keyword lispKey^I^I:copier^I^I^I^I:initial-element^I^I:rehash-size
- line 443: syn keyword lispKey^I^I:count^I^I^I^I:initial-offset^I^I^I:rehash-threshold
- line 444: syn keyword lispKey^I^I:create^I^I^I^I:initial-value^I^I^I:rename
- line 445: syn keyword lispKey^I^I:default^I^I^I:input^I^I^I^I:rename-and-delete
- line 446: syn keyword lispKey^I^I:defaults^I^I^I:internal^I^I^I:size
- line 447: syn keyword lispKey^I^I:device^I^I^I^I:io^I^I^I^I:start
- line 448: syn keyword lispKey^I^I:direction^I^I^I:junk-allowed^I^I^I:start1
- line 449: syn keyword lispKey^I^I:directory^I^I^I:key^I^I^I^I:start2
- line 450: syn keyword lispKey^I^I:displaced-index-offset^I^I:length^I^I^I^I:stream
- line 451: syn keyword lispKey^I^I:displaced-to^I^I^I:level^I^I^I^I:supersede
- line 452: syn keyword lispKey^I^I:element-type^I^I^I:name^I^I^I^I:test
- line 453: syn keyword lispKey^I^I:end^I^I^I^I:named^I^I^I^I:test-not
- line 454: syn keyword lispKey^I^I:end1^I^I^I^I:new-version^I^I^I:type
- line 455: syn keyword lispKey^I^I:end2^I^I^I^I:nicknames^I^I^I:use
- line 456: syn keyword lispKey^I^I:error^I^I^I^I:output^I^I^I^I:verbose
- line 457: syn keyword lispKey^I^I:escape^I^I^I^I:output-file^I^I^I:version
- line 458: syn keyword lispKey^I^I:external
- line 459: " defpackage arguments
- line 460: syn keyword lispKey^I:documentation^I:shadowing-import-from^I:modern^I^I:export
- line 461: syn keyword lispKey^I:case-sensitive^I:case-inverted^I^I:shadow^I^I:import-from^I:intern
- line 462: " lambda list keywords
- line 463: syn keyword lispKey^I&allow-other-keys^I&aux^I^I&body
- line 464: syn keyword lispKey^I&environment^I&key^I^I^I&optional^I&rest^I^I&whole
- line 465: " make-array argument
- line 466: syn keyword lispKey^I:fill-pointer
- line 467: " readtable-case values
- line 468: syn keyword lispKey^I:upcase^I^I:downcase^I^I:preserve^I:invert
- line 469: " eval-when situations
- line 470: syn keyword lispKey^I:load-toplevel^I:compile-toplevel^I:execute
- line 471: " ANSI Extended LOOP:
- line 472: syn keyword lispKey^I:while :until :for :do :if :then :else :when :unless :in
- line 473: syn keyword lispKey^I:across :finally :collect :nconc :maximize :minimize :sum
- line 474: syn keyword lispKey^I:and :with :initially :append :into :count :end :repeat
- line 475: syn keyword lispKey^I:always :never :thereis :from :to :upto :downto :below
- line 476: syn keyword lispKey^I:above :by :on :being :each :the :hash-key :hash-keys
- line 477: syn keyword lispKey^I:hash-value :hash-values :using :of-type :upfrom :downfrom
- line 478: if exists("g:lispsyntax_clisp")
- line 479: " CLISP FFI:
- line 480: syn keyword lispKey^I:arguments :return-type :library :full :malloc-free
- line 481: syn keyword lispKey^I:none :alloca :in :out :in-out :stdc-stdcall :stdc :c
- line 482: syn keyword lispKey^I:language :built-in :typedef :external
- line 483: syn keyword lispKey^I:fini :init-once :init-always
- line 484: endif
- line 485:
- line 486: " ---------------------------------------------------------------------
- line 487: " Standard Lisp Variables: {{{1
- line 488: syn keyword lispVar^I^I*applyhook*^I^I^I*load-pathname*^I^I^I*print-pprint-dispatch*
- line 489: syn keyword lispVar^I^I*break-on-signals*^I^I*load-print*^I^I^I*print-pprint-dispatch*
- line 490: syn keyword lispVar^I^I*break-on-signals*^I^I*load-truename*^I^I^I*print-pretty*
- line 491: syn keyword lispVar^I^I*break-on-warnings*^I^I*load-verbose*^I^I^I*print-radix*
- line 492: syn keyword lispVar^I^I*compile-file-pathname*^I^I*macroexpand-hook*^I^I*print-readably*
- line 493: syn keyword lispVar^I^I*compile-file-pathname*^I^I*modules*^I^I^I*print-right-margin*
- line 494: syn keyword lispVar^I^I*compile-file-truename*^I^I*package*^I^I^I*print-right-margin*
- line 495: syn keyword lispVar^I^I*compile-file-truename*^I^I*print-array*^I^I^I*query-io*
- line 496: syn keyword lispVar^I^I*compile-print*^I^I^I*print-base*^I^I^I*random-state*
- line 497: syn keyword lispVar^I^I*compile-verbose*^I^I*print-case*^I^I^I*read-base*
- line 498: syn keyword lispVar^I^I*compile-verbose*^I^I*print-circle*^I^I^I*read-default-float-format*
- line 499: syn keyword lispVar^I^I*debug-io*^I^I^I*print-escape*^I^I^I*read-eval*
- line 500: syn keyword lispVar^I^I*debugger-hook*^I^I^I*print-gensym*^I^I^I*read-suppress*
- line 501: syn keyword lispVar^I^I*default-pathname-defaults*^I*print-length*^I^I^I*readtable*
- line 502: syn keyword lispVar^I^I*error-output*^I^I^I*print-level*^I^I^I*standard-input*
- line 503: syn keyword lispVar^I^I*evalhook*^I^I^I*print-lines*^I^I^I*standard-output*
- line 504: syn keyword lispVar^I^I*features*^I^I^I*print-miser-width*^I^I*terminal-io*
- line 505: syn keyword lispVar^I^I*gensym-counter*^I^I*print-miser-width*^I^I*trace-output*
- line 506:
- line 507: " ---------------------------------------------------------------------
- line 508: " Strings: {{{1
- line 509: syn region^I^I^IlispString^I^I^Istart=+"+ skip=+\\\\\|\\"+ end=+"+^Icontains=@Spell
- line 510: if exists("g:lisp_instring")
- line 511: syn region^I^I^IlispInString^I^I^Ikeepend matchgroup=Delimiter start=+"(+rs=s+1 skip=+|.\{-}|+ matchgroup=Delimiter end=+)"+ contains=@lispBaseListCluster,lispInStringString
- line 512: syn region^I^I^IlispInStringString^I^Istart=+\\"+ skip=+\\\\+ end=+\\"+ contained
- line 513: endif
- line 514:
- line 515: " ---------------------------------------------------------------------
- line 516: " Shared with Xlisp, Declarations, Macros, Functions: {{{1
- line 517: syn keyword lispDecl^I^Idefmacro^I^I^Ido-all-symbols^I^Ilabels
- line 518: syn keyword lispDecl^I^Idefsetf^I^I^I^Ido-external-symbols^Ilet
- line 519: syn keyword lispDecl^I^Ideftype^I^I^I^Ido-symbols^I^Ilocally
- line 520: syn keyword lispDecl^I^Idefun^I^I^I^Idotimes^I^I^Imacrolet
- line 521: syn keyword lispDecl^I^Ido*^I^I^I^Iflet^I^I^Imultiple-value-bind
- line 522: if exists("g:lispsyntax_clisp")
- line 523: " CLISP FFI:
- line 524: syn match lispDecl^I"\<\(ffi:\)\?def-c-\(var\|const\|enum\|type\|struct\)\>"
- line 525: syn match lispDecl^I"\<\(ffi:\)\?def-call-\(out\|in\)\>"
- line 526: syn match lispDecl^I"\<\(ffi:\)\?c-\(function\|struct\|pointer\|string\)\>"
- line 527: syn match lispDecl^I"\<\(ffi:\)\?c-ptr\(-null\)\?\>"
- line 528: syn match lispDecl^I"\<\(ffi:\)\?c-array\(-ptr\|-max\)\?\>"
- line 529: syn match lispDecl^I"\<\(ffi:\)\?[us]\?\(char\|short\|int\|long\)\>"
- line 530: syn match lispDecl^I"\<\(win32:\|w32\)\?d\?word\>"
- line 531: syn match lispDecl^I"\<\([us]_\?\)\?int\(8\|16\|32\|64\)\(_t\)\?\>"
- line 532: syn keyword lispDecl^Isize_t off_t time_t handle
- line 533: endif
- line 534:
- line 535: " ---------------------------------------------------------------------
- line 536: " Numbers: supporting integers and floating point numbers {{{1
- line 537: syn match lispNumber^I^I"-\=\(\.\d\+\|\d\+\(\.\d*\)\=\)\([dDeEfFlL][-+]\=\d\+\)\="
- line 538: syn match lispNumber^I^I"-\=\(\d\+/\d\+\)"
- line 539:
- line 540: syn match lispEscapeSpecial^I^I"\*\w[a-z_0-9-]*\*"
- line 541: syn match lispEscapeSpecial^I^I!#|[^()'`,"; \t]\+|#!
- line 542: syn match lispEscapeSpecial^I^I!#x\x\+!
- line 543: syn match lispEscapeSpecial^I^I!#o\o\+!
- line 544: syn match lispEscapeSpecial^I^I!#b[01]\+!
- line 545: syn match lispEscapeSpecial^I^I!#\\[ -}\~]!
- line 546: syn match lispEscapeSpecial^I^I!#[':][^()'`,"; \t]\+!
- line 547: syn match lispEscapeSpecial^I^I!#([^()'`,"; \t]\+)!
- line 548: syn match lispEscapeSpecial^I^I!#\\\%(Space\|Newline\|Tab\|Page\|Rubout\|Linefeed\|Return\|Backspace\)!
- line 549: syn match lispEscapeSpecial^I^I"\<+[a-zA-Z_][a-zA-Z_0-9-]*+\>"
- line 550:
- line 551: syn match lispConcat^I^I"\s\.\s"
- line 552: syn match lispParenError^I")"
- line 553:
- line 554: " ---------------------------------------------------------------------
- line 555: " Comments: {{{1
- line 556: syn cluster lispCommentGroup^Icontains=lispTodo,@Spell
- line 557: syn match lispComment^I^I";.*$"^I^I^I^Icontains=@lispCommentGroup
- line 558: syn region lispCommentRegion^Istart="#|" end="|#"^I^Icontains=lispCommentRegion,@lispCommentGroup
- line 559: syn keyword lispTodo^I^Icontained^I^I^Icombak^I^I^Icombak:^I^I^Itodo^I^I^Itodo:
- line 560:
- line 561: " ---------------------------------------------------------------------
- line 562: " Synchronization: {{{1
- line 563: syn sync lines=100
- line 564:
- line 565: " ---------------------------------------------------------------------
- line 566: " Define Highlighting: {{{1
- line 567: " For version 5.7 and earlier: only when not done already
- line 568: " For version 5.8 and later: only when an item doesn't have highlighting yet
- line 569: if version >= 508
- line 570: command -nargs=+ HiLink hi def link <args>
- line 571:
- line 572: HiLink lispCommentRegion^IlispComment
- line 572: hi def link lispCommentRegion^IlispComment
- line 573: HiLink lispAtomNmbr^I^IlispNumber
- line 573: hi def link lispAtomNmbr^I^IlispNumber
- line 574: HiLink lispAtomMark^I^IlispMark
- line 574: hi def link lispAtomMark^I^IlispMark
- line 575: HiLink lispInStringString^IlispString
- line 575: hi def link lispInStringString^IlispString
- line 576:
- line 577: HiLink lispAtom^I^IIdentifier
- line 577: hi def link lispAtom^I^IIdentifier
- line 578: HiLink lispAtomBarSymbol^ISpecial
- line 578: hi def link lispAtomBarSymbol^ISpecial
- line 579: HiLink lispBarSymbol^I^ISpecial
- line 579: hi def link lispBarSymbol^I^ISpecial
- line 580: HiLink lispComment^I^IComment
- line 580: hi def link lispComment^I^IComment
- line 581: HiLink lispConcat^I^IStatement
- line 581: hi def link lispConcat^I^IStatement
- line 582: HiLink lispDecl^I^IStatement
- line 582: hi def link lispDecl^I^IStatement
- line 583: HiLink lispFunc^I^IStatement
- line 583: hi def link lispFunc^I^IStatement
- line 584: HiLink lispKey^I^IType
- line 584: hi def link lispKey^I^IType
- line 585: HiLink lispMark^I^IDelimiter
- line 585: hi def link lispMark^I^IDelimiter
- line 586: HiLink lispNumber^I^INumber
- line 586: hi def link lispNumber^I^INumber
- line 587: HiLink lispParenError^I^IError
- line 587: hi def link lispParenError^I^IError
- line 588: HiLink lispEscapeSpecial^IType
- line 588: hi def link lispEscapeSpecial^IType
- line 589: HiLink lispString^I^IString
- line 589: hi def link lispString^I^IString
- line 590: HiLink lispTodo^I^ITodo
- line 590: hi def link lispTodo^I^ITodo
- line 591: HiLink lispVar^I^IStatement
- line 591: hi def link lispVar^I^IStatement
- line 592:
- line 593: if exists("g:lisp_rainbow") && g:lisp_rainbow != 0
- line 594: if &bg == "dark"
- line 595: hi def hlLevel0 ctermfg=red guifg=red1
- line 596: hi def hlLevel1 ctermfg=yellow guifg=orange1
- line 597: hi def hlLevel2 ctermfg=green guifg=yellow1
- line 598: hi def hlLevel3 ctermfg=cyan guifg=greenyellow
- line 599: hi def hlLevel4 ctermfg=magenta guifg=green1
- line 600: hi def hlLevel5 ctermfg=red guifg=springgreen1
- line 601: hi def hlLevel6 ctermfg=yellow guifg=cyan1
- line 602: hi def hlLevel7 ctermfg=green guifg=slateblue1
- line 603: hi def hlLevel8 ctermfg=cyan guifg=magenta1
- line 604: hi def hlLevel9 ctermfg=magenta guifg=purple1
- line 605: else
- line 606: hi def hlLevel0 ctermfg=red guifg=red3
- line 607: hi def hlLevel1 ctermfg=darkyellow guifg=orangered3
- line 608: hi def hlLevel2 ctermfg=darkgreen guifg=orange2
- line 609: hi def hlLevel3 ctermfg=blue guifg=yellow3
- line 610: hi def hlLevel4 ctermfg=darkmagenta guifg=olivedrab4
- line 611: hi def hlLevel5 ctermfg=red guifg=green4
- line 612: hi def hlLevel6 ctermfg=darkyellow guifg=paleturquoise3
- line 613: hi def hlLevel7 ctermfg=darkgreen guifg=deepskyblue4
- line 614: hi def hlLevel8 ctermfg=blue guifg=darkslateblue
- line 615: hi def hlLevel9 ctermfg=darkmagenta guifg=darkviolet
- line 616: endif
- line 617: endif
- line 618:
- line 619: delcommand HiLink
- line 620: endif
- line 621:
- line 622: let b:current_syntax = "lisp"
- line 623:
- line 624: " ---------------------------------------------------------------------
- line 625: " vim: ts=8 nowrap fdm=marker
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/syntax/lisp.vim
- continuing in function <SNR>19_SynSet
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/syntax/lisp/*.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/syntax/lisp.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/syntax/lisp/*.vim"
- Searching for "/Users/sjl/.vim/after/syntax/lisp.vim"
- Searching for "/Users/sjl/.vim/after/syntax/lisp/*.vim"
- line 23: endfor
- line 21: for name in split(s, '\.')
- line 22: exe "runtime! syntax/" . name . ".vim syntax/" . name . "/*.vim"
- line 23: endfor
- line 24: endif
- function <SNR>19_SynSet returning #0
- continuing in Syntax Auto commands for "*"
- Executing BufNewFile Auto commands for "*"
- autocommand if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat | runtime! scripts.vim | endif
- line 0: if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat | runtime! scripts.vim | endif
- line 0: runtime! scripts.vim | endif
- line 0: endif
- Executing BufNewFile Auto commands for "*"
- autocommand if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat && (getline(1) =~ '^#' || getline(2) =~ '^#' || getline(3) =~ '^#'^I|| getline(4) =~ '^#' || getline(5) =~ '^#') | setf conf | endif
- line 0: if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat && (getline(1) =~ '^#' || getline(2) =~ '^#' || getline(3) =~ '^#'^I|| getline(4) =~ '^#' || getline(5) =~ '^#') | setf conf | endif
- line 0: setf conf | endif
- line 0: endif
- Executing BufNewFile Auto commands for "*.lisp"
- autocommand call PareditInitBuffer()
- line 0: call PareditInitBuffer()
- calling function PareditInitBuffer()
- line 1: " Make sure to include special characters in 'iskeyword'
- line 2: " in case they are accidentally removed
- line 3: " Also define regular expressions to identify special characters used by paredit
- line 4: if &ft == 'clojure'
- line 5: setlocal iskeyword+=+,-,*,/,%,<,=,>,:,$,?,!,@-@,94,~,#,\|,&
- line 6: let b:any_matched_char = '(\|)\|\[\|\]\|{\|}\|\"'
- line 7: let b:any_matched_pair = '()\|\[\]\|{}\|\"\"'
- line 8: let b:any_opening_char = '(\|\[\|{'
- line 9: let b:any_closing_char = ')\|\]\|}'
- line 10: let b:any_openclose_char = '(\|)\|\[\|\]\|{\|}'
- line 11: let b:any_wsopen_char = '\s\|(\|\[\|{'
- line 12: let b:any_wsclose_char = '\s\|)\|\]\|}'
- line 13: else
- line 14: setlocal iskeyword+=+,-,*,/,%,<,=,>,:,$,?,!,@-@,94,~,#,\|,&,{,},[,]
- line 15: let b:any_matched_char = '(\|)\|\"'
- line 16: let b:any_matched_pair = '()\|\"\"'
- line 17: let b:any_opening_char = '('
- line 18: let b:any_closing_char = ')'
- line 19: let b:any_openclose_char = '(\|)'
- line 20: let b:any_wsopen_char = '\s\|('
- line 21: let b:any_wsclose_char = '\s\|)'
- line 22: endif
- line 23:
- line 24: if g:paredit_mode
- line 25: " Paredit mode is on: add buffer specific keybindings
- line 26: inoremap <buffer> <expr> ( PareditInsertOpening('(',')')
- line 27: inoremap <buffer> <expr> ) PareditInsertClosing('(',')')
- line 28: inoremap <buffer> <expr> " PareditInsertQuotes()
- line 29: inoremap <buffer> <expr> <BS> PareditBackspace(0)
- line 30: inoremap <buffer> <expr> <Del> PareditDel()
- line 31: nnoremap <buffer> <silent> ( :<C-U>call PareditFindOpening('(',')',0)<CR>
- line 32: nnoremap <buffer> <silent> ) :<C-U>call PareditFindClosing('(',')',0)<CR>
- line 33: vnoremap <buffer> <silent> ( <Esc>:<C-U>call PareditFindOpening('(',')',1)<CR>
- line 34: vnoremap <buffer> <silent> ) <Esc>:<C-U>call PareditFindClosing('(',')',1)<CR>
- line 35: nnoremap <buffer> <silent> [[ :<C-U>call PareditFindDefunBck()<CR>
- line 36: nnoremap <buffer> <silent> ]] :<C-U>call PareditFindDefunFwd()<CR>
- line 37: nnoremap <buffer> <silent> x :<C-U>call PareditEraseFwd()<CR>
- line 38: nnoremap <buffer> <silent> <Del> :<C-U>call PareditEraseFwd()<CR>
- line 39: nnoremap <buffer> <silent> X :<C-U>call PareditEraseBck()<CR>
- line 40: nnoremap <buffer> <silent> s :<C-U>call PareditEraseFwd()<CR>i
- line 41: nnoremap <buffer> <silent> D v$:<C-U>call PareditDelete(visualmode(),1)<CR>
- line 42: nnoremap <buffer> <silent> C v$:<C-U>call PareditChange(visualmode(),1)<CR>
- line 43: nnoremap <buffer> <silent> d :<C-U>call PareditSetDelete(v:count)<CR>g@
- line 44: vnoremap <buffer> <silent> d :<C-U>call PareditDelete(visualmode(),1)<CR>
- line 45: vnoremap <buffer> <silent> x :<C-U>call PareditDelete(visualmode(),1)<CR>
- line 46: vnoremap <buffer> <silent> <Del> :<C-U>call PareditDelete(visualmode(),1)<CR>
- line 47: nnoremap <buffer> <silent> c :set opfunc=PareditChange<CR>g@
- line 48: vnoremap <buffer> <silent> c :<C-U>call PareditChange(visualmode(),1)<CR>
- line 49: nnoremap <buffer> <silent> dd :<C-U>call PareditDeleteLines()<CR>
- line 50: nnoremap <buffer> <silent> cc :<C-U>call PareditChangeLines()<CR>
- line 51: nnoremap <buffer> <silent> p :<C-U>call PareditPut('p')<CR>
- line 52: nnoremap <buffer> <silent> P :<C-U>call PareditPut('P')<CR>
- line 53: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'w( :<C-U>call PareditWrap("(",")")<CR>'
- line 53: nnoremap <buffer> <silent> ,w( :<C-U>call PareditWrap("(",")")<CR>
- line 54: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'w( :<C-U>call PareditWrapSelection("(",")")<CR>'
- line 54: vnoremap <buffer> <silent> ,w( :<C-U>call PareditWrapSelection("(",")")<CR>
- line 55: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'w" :<C-U>call PareditWrap('."'".'"'."','".'"'."')<CR>"
- line 55: nnoremap <buffer> <silent> ,w" :<C-U>call PareditWrap('"','"')<CR>
- line 56: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'w" :<C-U>call PareditWrapSelection('."'".'"'."','".'"'."')<CR>"
- line 56: vnoremap <buffer> <silent> ,w" :<C-U>call PareditWrapSelection('"','"')<CR>
- line 57: if &ft == 'clojure'
- line 58: inoremap <buffer> <expr> [ PareditInsertOpening('[',']')
- line 59: inoremap <buffer> <expr> ] PareditInsertClosing('[',']')
- line 60: inoremap <buffer> <expr> { PareditInsertOpening('{','}')
- line 61: inoremap <buffer> <expr> } PareditInsertClosing('{','}')
- line 62: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'w[ :<C-U>call PareditWrap("[","]")<CR>'
- line 63: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'w[ :<C-U>call PareditWrapSelection("[","]")<CR>'
- line 64: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'w{ :<C-U>call PareditWrap("{","}")<CR>'
- line 65: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'w{ :<C-U>call PareditWrapSelection("{","}")<CR>'
- line 66: endif
- line 67:
- line 68: if g:paredit_shortmaps
- line 69: " Shorter keymaps: old functionality of KEY is remapped to <Leader>KEY
- line 70: nnoremap <buffer> <silent> < :<C-U>call PareditMoveLeft()<CR>
- line 71: nnoremap <buffer> <silent> > :<C-U>call PareditMoveRight()<CR>
- line 72: nnoremap <buffer> <silent> O :<C-U>call PareditSplit()<CR>
- line 73: nnoremap <buffer> <silent> J :<C-U>call PareditJoin()<CR>
- line 74: nnoremap <buffer> <silent> W :<C-U>call PareditWrap('(',')')<CR>
- line 75: vnoremap <buffer> <silent> W :<C-U>call PareditWrapSelection('(',')')<CR>
- line 76: nnoremap <buffer> <silent> S :<C-U>call PareditSplice()<CR>
- line 77: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'< :<C-U>normal! <<CR>'
- line 78: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'> :<C-U>normal! ><CR>'
- line 79: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'O :<C-U>normal! O<CR>'
- line 80: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'J :<C-U>normal! J<CR>'
- line 81: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'W :<C-U>normal! W<CR>'
- line 82: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'W :<C-U>normal! W<CR>'
- line 83: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'S :<C-U>normal! S<CR>'
- line 84: else
- line 85: " Longer keymaps with <Leader> prefix
- line 86: nnoremap <buffer> <silent> S V:<C-U>call PareditChange(visualmode(),1)<CR>
- line 87: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'< :<C-U>call PareditMoveLeft()<CR>'
- line 87: nnoremap <buffer> <silent> ,< :<C-U>call PareditMoveLeft()<CR>
- line 88: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'> :<C-U>call PareditMoveRight()<CR>'
- line 88: nnoremap <buffer> <silent> ,> :<C-U>call PareditMoveRight()<CR>
- line 89: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'O :<C-U>call PareditSplit()<CR>'
- line 89: nnoremap <buffer> <silent> ,O :<C-U>call PareditSplit()<CR>
- line 90: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'J :<C-U>call PareditJoin()<CR>'
- line 90: nnoremap <buffer> <silent> ,J :<C-U>call PareditJoin()<CR>
- line 91: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'W :<C-U>call PareditWrap("(",")")<CR>'
- line 91: nnoremap <buffer> <silent> ,W :<C-U>call PareditWrap("(",")")<CR>
- line 92: execute 'vnoremap <buffer> <silent> ' . g:paredit_leader.'W :<C-U>call PareditWrapSelection("(",")")<CR>'
- line 92: vnoremap <buffer> <silent> ,W :<C-U>call PareditWrapSelection("(",")")<CR>
- line 93: execute 'nnoremap <buffer> <silent> ' . g:paredit_leader.'S :<C-U>call PareditSplice()<CR>'
- line 93: nnoremap <buffer> <silent> ,S :<C-U>call PareditSplice()<CR>
- line 94: endif
- line 95: else
- line 96: " Paredit mode is off: remove keybindings
- line 97: silent! iunmap <buffer> (
- line 98: silent! iunmap <buffer> )
- line 99: silent! iunmap <buffer> "
- line 100: silent! iunmap <buffer> <BS>
- line 101: silent! iunmap <buffer> <Del>
- line 102: silent! unmap <buffer> (
- line 103: silent! unmap <buffer> )
- line 104: silent! unmap <buffer> [[
- line 105: silent! unmap <buffer> ]]
- line 106: silent! unmap <buffer> x
- line 107: silent! unmap <buffer> <Del>
- line 108: silent! unmap <buffer> X
- line 109: silent! unmap <buffer> s
- line 110: silent! unmap <buffer> D
- line 111: silent! unmap <buffer> C
- line 112: silent! unmap <buffer> d
- line 113: silent! unmap <buffer> c
- line 114: silent! unmap <buffer> dd
- line 115: silent! unmap <buffer> cc
- line 116: if &ft == 'clojure'
- line 117: silent! iunmap <buffer> [
- line 118: silent! iunmap <buffer> ]
- line 119: silent! iunmap <buffer> {
- line 120: silent! iunmap <buffer> }
- line 121: endif
- line 122: endif
- function PareditInitBuffer returning #0
- continuing in BufNewFile Auto commands for "*.lisp"
- Executing BufEnter Auto commands for "*"
- autocommand call s:checkForBrowse(expand("<amatch>"))
- line 0: call s:checkForBrowse(expand("<amatch>"))
- calling function <SNR>38_checkForBrowse('/Users/sjl/src/lol/Slimv.REPL.lisp')
- line 1: if a:dir != '' && isdirectory(a:dir)
- line 2: call s:initNerdTreeInPlace(a:dir)
- line 3: endif
- function <SNR>38_checkForBrowse returning #0
- continuing in BufEnter Auto commands for "*"
- line 16: unlet! b:keymap_name
- line 17: else
- line 18: execute "silent view! " . a:filename
- line 19: endif
- line 20: endif
- line 21: stopinsert
- function SlimvConnectServer..SlimvOpenReplBuffer..SlimvOpenBuffer..<SNR>70_SplitView returning #0
- continuing in function SlimvConnectServer..SlimvOpenReplBuffer..SlimvOpenBuffer
- line 5: else
- line 6: if g:slimv_repl_split
- line 7: " Buffer is already created. Check if it is open in a window
- line 8: let win = bufwinnr( buf )
- line 9: if win == -1
- line 10: " Create windows
- line 11: call s:SplitView( a:name )
- line 12: else
- line 13: " Switch to the buffer's window
- line 14: if winnr() != win
- line 15: execute win . "wincmd w"
- line 16: endif
- line 17: endif
- line 18: else
- line 19: execute "buffer " . buf
- line 20: stopinsert
- line 21: endif
- line 22: endif
- line 23: setlocal buftype=nofile
- line 24: setlocal noswapfile
- line 25: setlocal noreadonly
- function SlimvConnectServer..SlimvOpenReplBuffer..SlimvOpenBuffer returning #0
- continuing in function SlimvConnectServer..SlimvOpenReplBuffer
- line 2: if !g:slimv_repl_syntax
- line 3: set syntax=
- line 4: endif
- line 5:
- line 6: " Add keybindings valid only for the REPL buffer
- line 7: inoremap <buffer> <silent> <CR> <C-R>=pumvisible() ? "\<lt>CR>" : "\<lt>End>\<lt>C-O>:call SlimvSendCommand(0)\<lt>CR>"<CR>
- line 8: inoremap <buffer> <silent> <C-CR> <End><C-O>:call SlimvSendCommand(1)<CR>
- line 9: inoremap <buffer> <silent> <Up> <C-R>=pumvisible() ? "\<lt>Up>" : "\<lt>C-O>:call SlimvHandleUp()\<lt>CR>"<CR>
- line 10: inoremap <buffer> <silent> <Down> <C-R>=pumvisible() ? "\<lt>Down>" : "\<lt>C-O>:call SlimvHandleDown()\<lt>CR>"<CR>
- line 11: inoremap <buffer> <silent> <C-C> <C-O>:call SlimvInterrupt()<CR>
- line 12:
- line 13: if exists( 'g:paredit_loaded' )
- line 14: inoremap <buffer> <silent> <expr> <BS> PareditBackspace(1)
- line 15: else
- line 16: inoremap <buffer> <silent> <expr> <BS> SlimvHandleBS()
- line 17: endif
- line 18:
- line 19: if g:slimv_keybindings == 1
- line 20: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'. :call SlimvSendCommand(0)<CR>'
- line 21: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'/ :call SlimvSendCommand(1)<CR>'
- line 22: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'<Up> :call SlimvPreviousCommand()<CR>'
- line 23: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'<Down> :call SlimvNextCommand()<CR>'
- line 24: elseif g:slimv_keybindings == 2
- line 25: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rs :call SlimvSendCommand(0)<CR>'
- line 25: noremap <buffer> <silent> \rs :call SlimvSendCommand(0)<CR>
- line 26: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'ro :call SlimvSendCommand(1)<CR>'
- line 26: noremap <buffer> <silent> \ro :call SlimvSendCommand(1)<CR>
- line 27: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rp :call SlimvPreviousCommand()<CR>'
- line 27: noremap <buffer> <silent> \rp :call SlimvPreviousCommand()<CR>
- line 28: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rn :call SlimvNextCommand()<CR>'
- line 28: noremap <buffer> <silent> \rn :call SlimvNextCommand()<CR>
- line 29: endif
- line 30:
- line 31: if g:slimv_repl_wrap
- line 32: inoremap <buffer> <silent> <Home> <C-O>g<Home>
- line 33: inoremap <buffer> <silent> <End> <C-O>:call <SID>EndOfScreenLine()<CR>
- line 34: noremap <buffer> <silent> <Up> gk
- line 35: noremap <buffer> <silent> <Down> gj
- line 36: noremap <buffer> <silent> <Home> g<Home>
- line 37: noremap <buffer> <silent> <End> :call <SID>EndOfScreenLine()<CR>
- line 38: noremap <buffer> <silent> k gk
- line 39: noremap <buffer> <silent> j gj
- line 40: noremap <buffer> <silent> 0 g0
- line 41: noremap <buffer> <silent> $ :call <SID>EndOfScreenLine()<CR>
- line 42: set wrap
- line 43: endif
- line 44:
- line 45: hi SlimvNormal term=none cterm=none gui=none
- line 46: hi SlimvCursor term=reverse cterm=reverse gui=reverse
- line 47:
- line 48: " Add autocommands specific to the REPL buffer
- line 49: execute "au FileChangedShell " . g:slimv_repl_file . " :call SlimvRefreshReplBuffer()"
- line 49: au FileChangedShell Slimv.REPL.lisp :call SlimvRefreshReplBuffer()
- line 50: execute "au FocusGained " . g:slimv_repl_file . " :call SlimvRefreshReplBuffer()"
- line 50: au FocusGained Slimv.REPL.lisp :call SlimvRefreshReplBuffer()
- line 51: execute "au BufEnter " . g:slimv_repl_file . " :call SlimvReplEnter()"
- line 51: au BufEnter Slimv.REPL.lisp :call SlimvReplEnter()
- line 52: execute "au BufLeave " . g:slimv_repl_file . " :call SlimvReplLeave()"
- line 52: au BufLeave Slimv.REPL.lisp :call SlimvReplLeave()
- line 53:
- line 54: filetype on
- Searching for "filetype.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bundle/vim-coffee-script,/Users/sjl/.vim/bundle/
- Searching for "/Users/sjl/.vim/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/filetype.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/filetype.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime)
- fchdir() to previous dir
- line 54: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim"
- line 1: " Vim support file to detect file types
- line 2: "
- line 3: " Maintainer:^IBram Moolenaar <Bram@vim.org>
- line 4: " Last Change:^I2011 Sep 07
- line 5:
- line 6: " Listen very carefully, I will say this only once
- line 7: if exists("did_load_filetypes")
- line 8: finish
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim
- continuing in function SlimvConnectServer..SlimvOpenReplBuffer
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/filetype.vim"
- Searching for "/Users/sjl/.vim/after/filetype.vim"
- line 55: redraw
- calling function SlimvConnectServer..SlimvOpenReplBuffer..GetLispFold()
- line 1: if getline(v:lnum) =~ '^\s*(defun.*\s'
- line 2: return ">1"
- line 3: elseif getline(v:lnum) =~ '^\s*(defmacro.*\s'
- line 4: return ">1"
- line 5: elseif getline(v:lnum) =~ '^\s*(defparameter.*\s'
- line 6: return ">1"
- line 7: elseif getline(v:lnum) =~ '^\s*$'
- line 8: let my_lispnum = v:lnum
- line 9: let my_lispmax = line("$")
- line 10:
- line 11: while (1)
- line 12: let my_lispnum = my_lispnum + 1
- line 13: if my_lispnum > my_lispmax
- line 14: return "<1"
- function SlimvConnectServer..SlimvOpenReplBuffer..GetLispFold returning '<1'
- continuing in function SlimvConnectServer..SlimvOpenReplBuffer
- line 56: let s:last_size = 0
- line 57:
- line 58: call SlimvRefreshReplBuffer()
- calling function SlimvConnectServer..SlimvOpenReplBuffer..SlimvRefreshReplBuffer()
- line 1: if s:refresh_disabled
- line 2: " Refresh is unwanted at the moment, probably another refresh is going on
- line 3: return
- line 4: endif
- line 5:
- line 6: let repl_buf = bufnr( g:slimv_repl_file )
- line 7: if repl_buf == -1
- line 8: " REPL buffer not loaded
- line 9: return
- line 10: endif
- line 11: let repl_win = bufwinnr( repl_buf )
- line 12: let this_win = winnr()
- line 13:
- line 14: if s:swank_connected
- line 15: call SlimvSwankResponse()
- line 16: endif
- function SlimvConnectServer..SlimvOpenReplBuffer..SlimvRefreshReplBuffer returning #0
- continuing in function SlimvConnectServer..SlimvOpenReplBuffer
- function SlimvConnectServer..SlimvOpenReplBuffer returning #0
- continuing in function SlimvConnectServer
- line 5: endif
- line 6: if s:swank_connected
- line 7: python swank_disconnect()
- line 8: let s:swank_connected = 0
- line 9: endif
- line 10: call SlimvConnectSwank()
- calling function SlimvConnectServer..SlimvConnectSwank()
- line 1: if !s:python_initialized
- line 2: if ! has('python')
- line 3: call SlimvErrorWait( 'Vim is compiled without the Python feature. Unable to run SWANK client.' )
- line 4: return 0
- line 5: endif
- line 6: if g:slimv_windows || g:slimv_cygwin
- line 7: " Verify that Vim is compiled with Python and Python is properly installed
- line 8: let v = ''
- line 9: redir => v
- line 10: silent ver
- line 11: redir END
- line 12: let pydll = matchstr( v, '\cpython..\.dll' )
- line 13: if ! executable( pydll )
- line 14: call SlimvErrorWait( pydll . ' not found. Unable to run SWANK client.' )
- line 15: return 0
- line 16: endif
- line 17: endif
- line 18: python import vim
- line 19: execute 'pyfile ' . g:swank_path
- line 19: pyfile /Users/sjl/.vim/bundle/slimv/ftplugin/swank.py
- line 20: let s:python_initialized = 1
- line 21: endif
- line 22:
- line 23: if !s:swank_connected
- line 24: let s:swank_version = ''
- line 25: let s:lisp_version = ''
- line 26: if g:swank_host == ''
- line 27: let g:swank_host = input( 'Swank server host name: ', 'localhost' )
- line 28: endif
- line 29: execute 'python swank_connect("' . g:swank_host . '", ' . g:swank_port . ', "result" )'
- line 29: python swank_connect("localhost", 4005, "result" )
- line 29: let result="SWANK server is not running."
- line 30: if result != '' && ( g:swank_host == 'localhost' || g:swank_host == '127.0.0.1' )
- line 31: " SWANK server is not running, start server if possible
- line 32: let swank = SlimvSwankCommand()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand()
- line 1: if exists( 'g:slimv_swank_clojure' ) && SlimvGetFiletype() == 'clojure'
- line 2: return g:slimv_swank_clojure
- line 3: endif
- line 4: if exists( 'g:slimv_swank_scheme' ) && SlimvGetFiletype() == 'scheme'
- line 5: return g:slimv_swank_scheme
- line 6: endif
- line 7: if exists( 'g:slimv_swank_cmd' )
- line 8: return g:slimv_swank_cmd
- line 9: endif
- line 10:
- line 11: if g:slimv_lisp == ''
- line 12: let g:slimv_lisp = input( 'Enter Lisp path (or fill g:slimv_lisp in your vimrc): ', '', 'file' )
- line 13: endif
- line 14:
- line 15: let cmd = ''
- line 16: if SlimvGetFiletype() == 'clojure'
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..SlimvGetFiletype()
- line 1: if &ft != ''
- line 2: " Return Vim filetype if defined
- line 3: return &ft
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..SlimvGetFiletype returning 'lisp'
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand
- line 17: " First autodetect Leiningen and Cake
- line 18: if executable( 'lein' )
- line 19: let cmd = '"lein swank"'
- line 20: elseif executable( 'cake' )
- line 21: let cmd = '"cake swank"'
- line 22: else
- line 23: " Check if swank-clojure is bundled with Slimv
- line 24: let swanks = split( globpath( &runtimepath, 'swank-clojure/swank/swank.clj'), '\n' )
- line 25: if len( swanks ) == 0
- line 26: return ''
- line 27: endif
- line 28: let sclj = substitute( swanks[0], '\', '/', "g" )
- line 29: let cmd = g:slimv_lisp . ' -i "' . sclj . '" -e "(swank.swank/start-repl)" -r'
- line 30: endif
- line 31: elseif SlimvGetFiletype() == 'scheme'
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..SlimvGetFiletype()
- line 1: if &ft != ''
- line 2: " Return Vim filetype if defined
- line 3: return &ft
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..SlimvGetFiletype returning 'lisp'
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand
- line 32: let swanks = split( globpath( &runtimepath, 'slime/contrib/swank-mit-scheme.scm'), '\n' )
- line 33: if len( swanks ) == 0
- line 34: return ''
- line 35: endif
- line 36: if b:SlimvImplementation() == 'mit'
- line 37: let cmd = '"' . g:slimv_lisp . '" --load "' . swanks[0] . '"'
- line 38: endif
- line 39: else
- line 40: " First check if SWANK is bundled with Slimv
- line 41: let swanks = split( globpath( &runtimepath, 'slime/start-swank.lisp'), '\n' )
- line 42: if len( swanks ) == 0
- line 43: " Try to find SWANK in the standard SLIME installation locations
- line 44: if g:slimv_windows || g:slimv_cygwin
- line 45: let swanks = split( globpath( 'c:/slime/,c:/*lisp*/slime/,c:/*lisp*/site/lisp/slime/,c:/Program Files/*lisp*/site/lisp/slime/', 'start-swank.lisp' ), '\n' )
- line 46: else
- line 47: let swanks = split( globpath( '/usr/share/common-lisp/source/slime/', 'start-swank.lisp' ), '\n' )
- line 48: endif
- line 49: endif
- line 50: if len( swanks ) == 0
- line 51: return ''
- line 52: endif
- line 53:
- line 54: " Build proper SWANK start command for the Lisp implementation used
- line 55: if b:SlimvImplementation() == 'sbcl'
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..b:SlimvImplementation()
- line 1: if exists( 'g:slimv_impl' ) && g:slimv_impl != ''
- line 2: " Return Lisp implementation if defined
- line 3: return tolower( g:slimv_impl )
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..b:SlimvImplementation returning 'clisp'
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand
- line 56: let cmd = '"' . g:slimv_lisp . '" --load "' . swanks[0] . '"'
- line 57: elseif b:SlimvImplementation() == 'clisp'
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..b:SlimvImplementation()
- line 1: if exists( 'g:slimv_impl' ) && g:slimv_impl != ''
- line 2: " Return Lisp implementation if defined
- line 3: return tolower( g:slimv_impl )
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand..b:SlimvImplementation returning 'clisp'
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand
- line 58: let cmd = '"' . g:slimv_lisp . '" -i "' . swanks[0] . '"'
- line 59: elseif b:SlimvImplementation() == 'allegro'
- line 60: let cmd = '"' . g:slimv_lisp . '" -L "' . swanks[0] . '"'
- line 61: elseif b:SlimvImplementation() == 'cmu'
- line 62: let cmd = '"' . g:slimv_lisp . '" -load "' . swanks[0] . '"'
- line 63: else
- line 64: let cmd = '"' . g:slimv_lisp . '" -l "' . swanks[0] . '"'
- line 65: endif
- line 66: endif
- line 67: if cmd != ''
- line 68: if g:slimv_windows || g:slimv_cygwin
- line 69: return '!start /MIN ' . cmd
- line 70: elseif g:slimv_osx
- line 71: return '!osascript -e "tell application \"Terminal\" to do script \"' . cmd . '\""'
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankCommand returning '!osascript -e "tell application \"Te...bundle/slimv/slime/start-swank.lisp"\""'
- continuing in function SlimvConnectServer..SlimvConnectSwank
- line 33: if swank != ''
- line 34: redraw
- line 35: echon "\rStarting SWANK server... ". swank
- Starting SWANK server... !osascript -e "tell application \"Terminal\" to do script \""clisp" -i "/Users/sjl/.vim/bundle/slimv/slime/start-swank.lisp"\""
- line 36: " echon "\rStarting SWANK server..."
- line 37: silent execute swank
- line 37: !osascript -e "tell application \"Terminal\" to do script \""clisp" -i "/Users/sjl/.vim/bundle/slimv/slime/start-swank.lisp"\""
- :!osascript -e "tell application \"Terminal\" to do script \""clisp" -i "/Users/sjl/.vim/bundle/slimv/slime/start-swank.lisp"\""
- Calling shell to execute: "osascript -e "tell application \"Terminal\" to do script \""clisp" -i "/Users/sjl/.vim/bundle/slimv/slime/start-swank.lisp"\"""tab 1 of window id 7402
- Executing ShellCmdPost Auto commands for "*"
- autocommand call s:LocalBrowseShellCmdRefresh()
- line 0: call s:LocalBrowseShellCmdRefresh()
- calling function <SNR>63_LocalBrowseShellCmdRefresh()
- line 1: " call Dfunc("LocalBrowseShellCmdRefresh() browselist=".(exists("s:netrw_browselist")? string(s:netrw_browselist) : "empty")." ".tabpagenr("$")." tabs")
- line 2: " determine which buffers currently reside in a tab
- line 3: if !exists("s:netrw_browselist")
- line 4: " call Dret("LocalBrowseShellCmdRefresh : browselist is empty")
- line 5: return
- line 6: endif
- line 7: if !exists("w:netrw_bannercnt")
- line 8: " call Dret("LocalBrowseShellCmdRefresh : don't refresh when focus not on netrw window")
- line 9: return
- function <SNR>63_LocalBrowseShellCmdRefresh returning #0
- continuing in ShellCmdPost Auto commands for "*"
- line 38: let starttime = localtime()
- line 39: while result != '' && localtime()-starttime < g:slimv_timeout
- line 40: sleep 500m
- line 41: execute 'python swank_connect("' . g:swank_host . '", ' . g:swank_port . ', "result" )'
- line 41: python swank_connect("localhost", 4005, "result" )
- line 41: let result="SWANK server is not running."
- line 42: endwhile
- line 39: while result != '' && localtime()-starttime < g:slimv_timeout
- line 40: sleep 500m
- line 41: execute 'python swank_connect("' . g:swank_host . '", ' . g:swank_port . ', "result" )'
- line 41: python swank_connect("localhost", 4005, "result" )
- line 41: let result=""
- line 42: endwhile
- line 39: while result != '' && localtime()-starttime < g:slimv_timeout
- line 40: sleep 500m
- line 41: execute 'python swank_connect("' . g:swank_host . '", ' . g:swank_port . ', "result" )'
- line 42: endwhile
- line 43: redraw!
- line 44: endif
- line 45: endif
- line 46: if result != ''
- line 47: " Display connection error message
- line 48: call SlimvErrorWait( result )
- line 49: return 0
- line 50: endif
- line 51:
- line 52: " Connected to SWANK server
- line 53: redraw
- line 54: echon "\rGetting SWANK connection info..."
- Getting SWANK connection info...
- line 55: let starttime = localtime()
- line 56: while s:swank_version == '' && localtime()-starttime < g:slimv_timeout
- line 57: call SlimvSwankResponse()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse()
- line 1: let s:refresh_disabled = 1
- line 2: silent execute 'python swank_output(1)'
- line 2: python swank_output(1)
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 3: let s:refresh_disabled = 0
- line 4: let msg = ''
- line 5: redir => msg
- line 6: silent execute 'python swank_response("")'
- line 6: python swank_response("")
- line 6: :let s:swank_action=''
- line 6: :let s:swank_actions_pending=1
- line 7: redir END
- line 8:
- line 9: if s:swank_action != '' && msg != ''
- line 10: if s:swank_action == ':describe-symbol'
- line 11: echo msg
- line 12: echo input('Press ENTER to continue.')
- line 13: endif
- line 14: endif
- line 15: if s:swank_actions_pending
- line 16: let s:last_update = -1
- line 17: elseif s:last_update < 0
- line 18: " Remember the time when all actions are processed
- line 19: let s:last_update = localtime()
- line 20: endif
- line 21: if s:swank_actions_pending == 0 && s:last_update >= 0 && s:last_update < localtime() - 2
- line 22: " All SWANK output handled long ago, restore original update frequency
- line 23: let &updatetime = s:save_updatetime
- line 24: endif
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank
- line 58: endwhile
- line 56: while s:swank_version == '' && localtime()-starttime < g:slimv_timeout
- line 57: call SlimvSwankResponse()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse()
- line 1: let s:refresh_disabled = 1
- line 2: silent execute 'python swank_output(1)'
- line 2: python swank_output(1)
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: :let s:swank_actions_pending=1
- line 2: let s:swank_version="2011-03-13"
- line 2: let s:lisp_version="2.49 (2010-07-07) (built 3526502521) (memory 3526502816)"
- line 2: :let s:swank_actions_pending=0
- line 2: call SlimvOpenReplBuffer()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer()
- line 1: call SlimvOpenBuffer( g:slimv_repl_file )
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer..SlimvOpenBuffer('Slimv.REPL.lisp')
- line 1: let buf = bufnr( a:name )
- line 2: if buf == -1
- line 3: " Create a new buffer
- line 4: call s:SplitView( a:name )
- line 5: else
- line 6: if g:slimv_repl_split
- line 7: " Buffer is already created. Check if it is open in a window
- line 8: let win = bufwinnr( buf )
- line 9: if win == -1
- line 10: " Create windows
- line 11: call s:SplitView( a:name )
- line 12: else
- line 13: " Switch to the buffer's window
- line 14: if winnr() != win
- line 15: execute win . "wincmd w"
- line 16: endif
- line 17: endif
- line 18: else
- line 19: execute "buffer " . buf
- line 20: stopinsert
- line 21: endif
- line 22: endif
- line 23: setlocal buftype=nofile
- line 24: setlocal noswapfile
- line 25: setlocal noreadonly
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer..SlimvOpenBuffer returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer
- line 2: if !g:slimv_repl_syntax
- line 3: set syntax=
- line 4: endif
- line 5:
- line 6: " Add keybindings valid only for the REPL buffer
- line 7: inoremap <buffer> <silent> <CR> <C-R>=pumvisible() ? "\<lt>CR>" : "\<lt>End>\<lt>C-O>:call SlimvSendCommand(0)\<lt>CR>"<CR>
- line 8: inoremap <buffer> <silent> <C-CR> <End><C-O>:call SlimvSendCommand(1)<CR>
- line 9: inoremap <buffer> <silent> <Up> <C-R>=pumvisible() ? "\<lt>Up>" : "\<lt>C-O>:call SlimvHandleUp()\<lt>CR>"<CR>
- line 10: inoremap <buffer> <silent> <Down> <C-R>=pumvisible() ? "\<lt>Down>" : "\<lt>C-O>:call SlimvHandleDown()\<lt>CR>"<CR>
- line 11: inoremap <buffer> <silent> <C-C> <C-O>:call SlimvInterrupt()<CR>
- line 12:
- line 13: if exists( 'g:paredit_loaded' )
- line 14: inoremap <buffer> <silent> <expr> <BS> PareditBackspace(1)
- line 15: else
- line 16: inoremap <buffer> <silent> <expr> <BS> SlimvHandleBS()
- line 17: endif
- line 18:
- line 19: if g:slimv_keybindings == 1
- line 20: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'. :call SlimvSendCommand(0)<CR>'
- line 21: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'/ :call SlimvSendCommand(1)<CR>'
- line 22: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'<Up> :call SlimvPreviousCommand()<CR>'
- line 23: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'<Down> :call SlimvNextCommand()<CR>'
- line 24: elseif g:slimv_keybindings == 2
- line 25: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rs :call SlimvSendCommand(0)<CR>'
- line 25: noremap <buffer> <silent> \rs :call SlimvSendCommand(0)<CR>
- line 26: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'ro :call SlimvSendCommand(1)<CR>'
- line 26: noremap <buffer> <silent> \ro :call SlimvSendCommand(1)<CR>
- line 27: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rp :call SlimvPreviousCommand()<CR>'
- line 27: noremap <buffer> <silent> \rp :call SlimvPreviousCommand()<CR>
- line 28: execute 'noremap <buffer> <silent> ' . g:slimv_leader.'rn :call SlimvNextCommand()<CR>'
- line 28: noremap <buffer> <silent> \rn :call SlimvNextCommand()<CR>
- line 29: endif
- line 30:
- line 31: if g:slimv_repl_wrap
- line 32: inoremap <buffer> <silent> <Home> <C-O>g<Home>
- line 33: inoremap <buffer> <silent> <End> <C-O>:call <SID>EndOfScreenLine()<CR>
- line 34: noremap <buffer> <silent> <Up> gk
- line 35: noremap <buffer> <silent> <Down> gj
- line 36: noremap <buffer> <silent> <Home> g<Home>
- line 37: noremap <buffer> <silent> <End> :call <SID>EndOfScreenLine()<CR>
- line 38: noremap <buffer> <silent> k gk
- line 39: noremap <buffer> <silent> j gj
- line 40: noremap <buffer> <silent> 0 g0
- line 41: noremap <buffer> <silent> $ :call <SID>EndOfScreenLine()<CR>
- line 42: set wrap
- line 43: endif
- line 44:
- line 45: hi SlimvNormal term=none cterm=none gui=none
- line 46: hi SlimvCursor term=reverse cterm=reverse gui=reverse
- line 47:
- line 48: " Add autocommands specific to the REPL buffer
- line 49: execute "au FileChangedShell " . g:slimv_repl_file . " :call SlimvRefreshReplBuffer()"
- line 49: au FileChangedShell Slimv.REPL.lisp :call SlimvRefreshReplBuffer()
- line 50: execute "au FocusGained " . g:slimv_repl_file . " :call SlimvRefreshReplBuffer()"
- line 50: au FocusGained Slimv.REPL.lisp :call SlimvRefreshReplBuffer()
- line 51: execute "au BufEnter " . g:slimv_repl_file . " :call SlimvReplEnter()"
- line 51: au BufEnter Slimv.REPL.lisp :call SlimvReplEnter()
- line 52: execute "au BufLeave " . g:slimv_repl_file . " :call SlimvReplLeave()"
- line 52: au BufLeave Slimv.REPL.lisp :call SlimvReplLeave()
- line 53:
- line 54: filetype on
- Searching for "filetype.vim" in "/Users/sjl/.vim,/Users/sjl/.vim/bundle/ack,/Users/sjl/.vim/bundle/closetags-custom,/Users/sjl/.vim/bundle/command-t,/Users/sjl/.vim/bundle/conf2dif,/Users/sjl/.vim/bundle/django-custom,/Users/sjl/.vim/bundle/drawit,/Users/sjl/.vim/bundle/easymotion,/Users/sjl/.vim/bundle/gundo,/Users/sjl/.vim/bundle/hammer,/Users/sjl/.vim/bundle/html5,/Users/sjl/.vim/bundle/indent-object,/Users/sjl/.vim/bundle/jinja-custom,/Users/sjl/.vim/bundle/linediff,/Users/sjl/.vim/bundle/markdown,/Users/sjl/.vim/bundle/nerdtree,/Users/sjl/.vim/bundle/nosecompiler,/Users/sjl/.vim/bundle/peepopen,/Users/sjl/.vim/bundle/puppet,/Users/sjl/.vim/bundle/pydoc,/Users/sjl/.vim/bundle/rainbow,/Users/sjl/.vim/bundle/slimv,/Users/sjl/.vim/bundle/snipmate,/Users/sjl/.vim/bundle/sparkup,/Users/sjl/.vim/bundle/strftimedammit,/Users/sjl/.vim/bundle/supertab,/Users/sjl/.vim/bundle/surround,/Users/sjl/.vim/bundle/threesome,/Users/sjl/.vim/bundle/vim-arpeggio,/Users/sjl/.vim/bundle/vim-coffee-script,/Users/sjl/.vim/bundle/
- Searching for "/Users/sjl/.vim/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/ack/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/closetags-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/command-t/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/conf2dif/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/django-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/drawit/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/easymotion/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/gundo/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/hammer/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/html5/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/indent-object/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/jinja-custom/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/linediff/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/markdown/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/nerdtree/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/nosecompiler/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/peepopen/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/puppet/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/pydoc/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/rainbow/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/slimv/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/sparkup/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/strftimedammit/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/supertab/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/surround/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/threesome/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-commentary/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-javascript/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-makegreen/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-orgmode/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-speeddating/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/yankring/filetype.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/filetype.vim"
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim"
- chdir(/Applications/MacVim.app/Contents/Resources/vim/runtime)
- fchdir() to previous dir
- line 54: sourcing "/Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim"
- line 1: " Vim support file to detect file types
- line 2: "
- line 3: " Maintainer:^IBram Moolenaar <Bram@vim.org>
- line 4: " Last Change:^I2011 Sep 07
- line 5:
- line 6: " Listen very carefully, I will say this only once
- line 7: if exists("did_load_filetypes")
- line 8: finish
- finished sourcing /Applications/MacVim.app/Contents/Resources/vim/runtime/filetype.vim
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer
- Searching for "/Applications/MacVim.app/Contents/Resources/vim/vimfiles/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/snipmate/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-arpeggio/after/filetype.vim"
- Searching for "/Users/sjl/.vim/bundle/vim-coffee-script/after/filetype.vim"
- Searching for "/Users/sjl/.vim/after/filetype.vim"
- line 55: redraw
- line 56: let s:last_size = 0
- line 57:
- line 58: call SlimvRefreshReplBuffer()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer..SlimvRefreshReplBuffer()
- line 1: if s:refresh_disabled
- line 2: " Refresh is unwanted at the moment, probably another refresh is going on
- line 3: return
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer..SlimvRefreshReplBuffer returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvOpenReplBuffer returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold()
- line 1: if getline(v:lnum) =~ '^\s*(defun.*\s'
- line 2: return ">1"
- line 3: elseif getline(v:lnum) =~ '^\s*(defmacro.*\s'
- line 4: return ">1"
- line 5: elseif getline(v:lnum) =~ '^\s*(defparameter.*\s'
- line 6: return ">1"
- line 7: elseif getline(v:lnum) =~ '^\s*$'
- line 8: let my_lispnum = v:lnum
- line 9: let my_lispmax = line("$")
- line 10:
- line 11: while (1)
- line 12: let my_lispnum = my_lispnum + 1
- line 13: if my_lispnum > my_lispmax
- line 14: return "<1"
- line 15: endif
- line 16:
- line 17: let my_lispdata = getline(my_lispnum)
- line 18:
- line 19: " If we match an empty line, stop folding
- line 20: if my_lispdata =~ '^$'
- line 21: return "<1"
- line 22: else
- line 23: return "="
- line 24: endif
- line 25: endwhile
- line 26: else
- line 27: return "="
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold returning '='
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold()
- line 1: if getline(v:lnum) =~ '^\s*(defun.*\s'
- line 2: return ">1"
- line 3: elseif getline(v:lnum) =~ '^\s*(defmacro.*\s'
- line 4: return ">1"
- line 5: elseif getline(v:lnum) =~ '^\s*(defparameter.*\s'
- line 6: return ">1"
- line 7: elseif getline(v:lnum) =~ '^\s*$'
- line 8: let my_lispnum = v:lnum
- line 9: let my_lispmax = line("$")
- line 10:
- line 11: while (1)
- line 12: let my_lispnum = my_lispnum + 1
- line 13: if my_lispnum > my_lispmax
- line 14: return "<1"
- line 15: endif
- line 16:
- line 17: let my_lispdata = getline(my_lispnum)
- line 18:
- line 19: " If we match an empty line, stop folding
- line 20: if my_lispdata =~ '^$'
- line 21: return "<1"
- line 22: else
- line 23: return "="
- line 24: endif
- line 25: endwhile
- line 26: else
- line 27: return "="
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold returning '='
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold()
- line 1: if getline(v:lnum) =~ '^\s*(defun.*\s'
- line 2: return ">1"
- line 3: elseif getline(v:lnum) =~ '^\s*(defmacro.*\s'
- line 4: return ">1"
- line 5: elseif getline(v:lnum) =~ '^\s*(defparameter.*\s'
- line 6: return ">1"
- line 7: elseif getline(v:lnum) =~ '^\s*$'
- line 8: let my_lispnum = v:lnum
- line 9: let my_lispmax = line("$")
- line 10:
- line 11: while (1)
- line 12: let my_lispnum = my_lispnum + 1
- line 13: if my_lispnum > my_lispmax
- line 14: return "<1"
- line 15: endif
- line 16:
- line 17: let my_lispdata = getline(my_lispnum)
- line 18:
- line 19: " If we match an empty line, stop folding
- line 20: if my_lispdata =~ '^$'
- line 21: return "<1"
- line 22: else
- line 23: return "="
- line 24: endif
- line 25: endwhile
- line 26: else
- line 27: return "="
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold returning '='
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold()
- line 1: if getline(v:lnum) =~ '^\s*(defun.*\s'
- line 2: return ">1"
- line 3: elseif getline(v:lnum) =~ '^\s*(defmacro.*\s'
- line 4: return ">1"
- line 5: elseif getline(v:lnum) =~ '^\s*(defparameter.*\s'
- line 6: return ">1"
- line 7: elseif getline(v:lnum) =~ '^\s*$'
- line 8: let my_lispnum = v:lnum
- line 9: let my_lispmax = line("$")
- line 10:
- line 11: while (1)
- line 12: let my_lispnum = my_lispnum + 1
- line 13: if my_lispnum > my_lispmax
- line 14: return "<1"
- line 15: endif
- line 16:
- line 17: let my_lispdata = getline(my_lispnum)
- line 18:
- line 19: " If we match an empty line, stop folding
- line 20: if my_lispdata =~ '^$'
- line 21: return "<1"
- line 22: else
- line 23: return "="
- line 24: endif
- line 25: endwhile
- line 26: else
- line 27: return "="
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..GetLispFold returning '='
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- line 2: call SlimvEndUpdateRepl()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl()
- line 1: call SlimvMarkBufferEnd()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl..SlimvMarkBufferEnd()
- line 1: setlocal nomodified
- line 2: call SlimvEndOfReplBuffer()
- calling function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl..SlimvMarkBufferEnd..SlimvEndOfReplBuffer()
- line 1: normal! G$
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl..SlimvMarkBufferEnd..SlimvEndOfReplBuffer returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl..SlimvMarkBufferEnd
- line 3: call setpos( "'s", [0, line('$'), col('$'), 0] )
- line 4: let s:prompt = getline( "'s" )
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl..SlimvMarkBufferEnd returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl
- line 2: let repl_buf = bufnr( g:slimv_repl_file )
- line 3: let repl_win = bufwinnr( repl_buf )
- line 4: if repl_buf != s:current_buf && repl_win != -1 && !s:debug_activated
- line 5: " Switch back to the caller buffer/window
- line 6: if g:slimv_repl_split
- line 7: if s:current_win == -1
- line 8: let s:current_win = winnr('#')
- line 9: endif
- line 10: if s:current_win > 0 && s:current_win != repl_win
- line 11: execute s:current_win . "wincmd w"
- line 11: 1wincmd w
- Executing BufLeave Auto commands for "Slimv.REPL.lisp"
- autocommand :call SlimvReplLeave()
- line 0: :call SlimvReplLeave()
- calling function SlimvReplLeave()
- line 1: try
- line 2: " Check if REPL menu exists, then remove it
- line 3: aunmenu REPL
- Exception thrown: Vim(aunmenu):E329: No menu "REPL"
- line 4: execute ':unmap ' . g:slimv_leader . '\'
- line 5: catch /.*/
- Exception caught: Vim(aunmenu):E329: No menu "REPL"
- line 6: " REPL menu not found, we cannot remove it
- line 7: endtry
- Exception finished: Vim(aunmenu):E329: No menu "REPL"
- line 8: if g:slimv_repl_split
- line 9: call SlimvRefreshModeOn()
- calling function SlimvReplLeave..SlimvRefreshModeOn()
- line 1: if ! s:au_curhold_set
- line 2: let s:au_curhold_set = 1
- line 3: execute "au CursorHold * :call SlimvTimer()"
- line 3: au CursorHold * :call SlimvTimer()
- line 4: execute "au CursorHoldI * :call SlimvTimer()"
- line 4: au CursorHoldI * :call SlimvTimer()
- line 5: endif
- function SlimvReplLeave..SlimvRefreshModeOn returning #0
- continuing in function SlimvReplLeave
- line 10: else
- line 11: call SlimvRefreshModeOff()
- line 12: endif
- function SlimvReplLeave returning #0
- continuing in BufLeave Auto commands for "Slimv.REPL.lisp"
- autocommand :call SlimvReplLeave()
- line 0: :call SlimvReplLeave()
- calling function SlimvReplLeave()
- line 1: try
- line 2: " Check if REPL menu exists, then remove it
- line 3: aunmenu REPL
- Exception thrown: Vim(aunmenu):E329: No menu "REPL"
- line 4: execute ':unmap ' . g:slimv_leader . '\'
- line 5: catch /.*/
- Exception caught: Vim(aunmenu):E329: No menu "REPL"
- line 6: " REPL menu not found, we cannot remove it
- line 7: endtry
- Exception finished: Vim(aunmenu):E329: No menu "REPL"
- line 8: if g:slimv_repl_split
- line 9: call SlimvRefreshModeOn()
- calling function SlimvReplLeave..SlimvRefreshModeOn()
- line 1: if ! s:au_curhold_set
- line 2: let s:au_curhold_set = 1
- line 3: execute "au CursorHold * :call SlimvTimer()"
- line 4: execute "au CursorHoldI * :call SlimvTimer()"
- line 5: endif
- function SlimvReplLeave..SlimvRefreshModeOn returning #0
- continuing in function SlimvReplLeave
- line 10: else
- line 11: call SlimvRefreshModeOff()
- line 12: endif
- function SlimvReplLeave returning #0
- continuing in BufLeave Auto commands for "Slimv.REPL.lisp"
- Executing WinLeave Auto commands for "*"
- autocommand :call <SID>YRWinLeave()
- line 0: :call <SID>YRWinLeave()
- calling function <SNR>50_YRWinLeave()
- line 1: " Track which window we are last in. We will use this information
- line 2: " to determine where we need to paste any contents, or which
- line 3: " buffer to return to.
- line 4:
- line 5: if s:yr_buffer_id < 0
- line 6: " The yankring window has never been activated
- line 7: return
- function <SNR>50_YRWinLeave returning #0
- continuing in WinLeave Auto commands for "*"
- chdir(/Users/sjl/src/lol)
- Executing WinEnter Auto commands for "*"
- autocommand call s:Highlight_Matching_Pair()
- line 0: call s:Highlight_Matching_Pair()
- calling function <SNR>53_Highlight_Matching_Pair()
- line 1: " Remove any previous match.
- line 2: if exists('w:paren_hl_on') && w:paren_hl_on
- line 3: 3match none
- line 4: let w:paren_hl_on = 0
- line 5: endif
- line 6:
- line 7: " Avoid that we remove the popup menu.
- line 8: " Return when there are no colors (looks like the cursor jumps).
- line 9: if pumvisible() || (&t_Co < 8 && !has("gui_running"))
- line 10: return
- line 11: endif
- line 12:
- line 13: " Get the character under the cursor and check if it's in 'matchpairs'.
- line 14: let c_lnum = line('.')
- line 15: let c_col = col('.')
- line 16: let before = 0
- line 17:
- line 18: let c = getline(c_lnum)[c_col - 1]
- line 19: let plist = split(&matchpairs, '.\zs[:,]')
- line 20: let i = index(plist, c)
- line 21: if i < 0
- line 22: " not found, in Insert mode try character before the cursor
- line 23: if c_col > 1 && (mode() == 'i' || mode() == 'R')
- line 24: let before = 1
- line 25: let c = getline(c_lnum)[c_col - 2]
- line 26: let i = index(plist, c)
- line 27: endif
- line 28: if i < 0
- line 29: " not found, nothing to do
- line 30: return
- line 31: endif
- line 32: endif
- line 33:
- line 34: " Figure out the arguments for searchpairpos().
- line 35: if i % 2 == 0
- line 36: let s_flags = 'nW'
- line 37: let c2 = plist[i + 1]
- line 38: else
- line 39: let s_flags = 'nbW'
- line 40: let c2 = c
- line 41: let c = plist[i - 1]
- line 42: endif
- line 43: if c == '['
- line 44: let c = '\['
- line 45: let c2 = '\]'
- line 46: endif
- line 47:
- line 48: " Find the match. When it was just before the cursor move it there for a
- line 49: " moment.
- line 50: if before > 0
- line 51: let save_cursor = winsaveview()
- line 52: call cursor(c_lnum, c_col - before)
- line 53: endif
- line 54:
- line 55: " When not in a string or comment ignore matches inside them.
- line 56: " We match "escape" for special items, such as lispEscapeSpecial.
- line 57: let s_skip ='synIDattr(synID(line("."), col("."), 0), "name") ' . '=~? "string\\|character\\|singlequote\\|escape\\|comment"'
- line 59: execute 'if' s_skip '| let s_skip = 0 | endif'
- line 59: if synIDattr(synID(line("."), col("."), 0), "name") =~? "string\\|character\\|singlequote\\|escape\\|comment" | let s_skip = 0 | endif
- line 59: let s_skip = 0 | endif
- line 59: endif
- line 60:
- line 61: " Limit the search to lines visible in the window.
- line 62: let stoplinebottom = line('w$')
- line 63: let stoplinetop = line('w0')
- line 64: if i % 2 == 0
- line 65: let stopline = stoplinebottom
- line 66: else
- line 67: let stopline = stoplinetop
- line 68: endif
- line 69:
- line 70: try
- line 71: " Limit the search time to 300 msec to avoid a hang on very long lines.
- line 72: " This fails when a timeout is not supported.
- line 73: let [m_lnum, m_col] = searchpairpos(c, '', c2, s_flags, s_skip, stopline, 300)
- line 74: catch /E118/
- line 75: " Can't use the timeout, restrict the stopline a bit more to avoid taking
- line 76: " a long time on closed folds and long lines.
- line 77: " The "viewable" variables give a range in which we can scroll while
- line 78: " keeping the cursor at the same position.
- line 79: " adjustedScrolloff accounts for very large numbers of scrolloff.
- line 80: let adjustedScrolloff = min([&scrolloff, (line('w$') - line('w0')) / 2])
- line 81: let bottom_viewable = min([line('$'), c_lnum + &lines - adjustedScrolloff - 2])
- line 82: let top_viewable = max([1, c_lnum-&lines+adjustedScrolloff + 2])
- line 83: " one of these stoplines will be adjusted below, but the current values are
- line 84: " minimal boundaries within the current window
- line 85: if i % 2 == 0
- line 86: if has("byte_offset") && has("syntax_items") && &smc > 0
- line 87: ^Ilet stopbyte = min([line2byte("$"), line2byte(".") + col(".") + &smc * 2])
- line 88: ^Ilet stopline = min([bottom_viewable, byte2line(stopbyte)])
- line 89: else
- line 90: ^Ilet stopline = min([bottom_viewable, c_lnum + 100])
- line 91: endif
- line 92: let stoplinebottom = stopline
- line 93: else
- line 94: if has("byte_offset") && has("syntax_items") && &smc > 0
- line 95: ^Ilet stopbyte = max([1, line2byte(".") + col(".") - &smc * 2])
- line 96: ^Ilet stopline = max([top_viewable, byte2line(stopbyte)])
- line 97: else
- line 98: ^Ilet stopline = max([top_viewable, c_lnum - 100])
- line 99: endif
- line 100: let stoplinetop = stopline
- line 101: endif
- line 102: let [m_lnum, m_col] = searchpairpos(c, '', c2, s_flags, s_skip, stopline)
- line 103: endtry
- line 104:
- line 105: if before > 0
- line 106: call winrestview(save_cursor)
- line 107: endif
- line 108:
- line 109: " If a match is found setup match highlighting.
- line 110: if m_lnum > 0 && m_lnum >= stoplinetop && m_lnum <= stoplinebottom
- line 111: exe '3match MatchParen /\(\%' . c_lnum . 'l\%' . (c_col - before) . 'c\)\|\(\%' . m_lnum . 'l\%' . m_col . 'c\)/'
- line 111: 3match MatchParen /\(\%1l\%1c\)\|\(\%1l\%7c\)/
- line 113: let w:paren_hl_on = 1
- line 114: endif
- function <SNR>53_Highlight_Matching_Pair returning #0
- continuing in WinEnter Auto commands for "*"
- Executing BufEnter Auto commands for "*"
- autocommand call s:checkForBrowse(expand("<amatch>"))
- line 0: call s:checkForBrowse(expand("<amatch>"))
- calling function <SNR>38_checkForBrowse('/Users/sjl/src/lol/foo.lisp')
- line 1: if a:dir != '' && isdirectory(a:dir)
- line 2: call s:initNerdTreeInPlace(a:dir)
- line 3: endif
- function <SNR>38_checkForBrowse returning #0
- continuing in BufEnter Auto commands for "*"
- line 12: endif
- line 13: else
- line 14: execute "buf " . s:current_buf
- line 15: endif
- line 16: endif
- function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse..SlimvEndUpdateRepl returning #0
- continuing in function SlimvConnectServer..SlimvConnectSwank..SlimvSwankResponse
- line 3: let s:refresh_disabled = 0
- line 4: let msg = ''
- line 5: redir => msg
- line 6: silent execute 'python swank_response("")'
- line 6: python swank_response("")
- line 6: :let s:swank_action=':connection-info'
- Writing viminfo file "/Users/sjl/.viminfo"
- Executing VimLeave Auto commands for "*"
- autocommand call s:NetrwBookHistSave()
- line 0: call s:NetrwBookHistSave()
- calling function <SNR>63_NetrwBookHistSave()
- line 1: " call Dfunc("s:NetrwBookHistSave() dirhistmax=".g:netrw_dirhistmax)
- line 2: if g:netrw_dirhistmax <= 0
- line 3: " call Dret("s:NetrwBookHistSave : dirhistmax=".g:netrw_dirhistmax)
- line 4: return
- line 5: endif
- line 6:
- line 7: let savefile= s:NetrwHome()."/.netrwhist"
- calling function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwHome()
- line 1: if exists("g:netrw_home")
- line 2: let home= g:netrw_home
- line 3: else
- line 4: " go to vim plugin home
- line 5: for home in split(&rtp,',') + ['']
- line 6: if isdirectory(home) && filewritable(home) | break | endif
- line 6: break | endif
- line 6: endif
- line 7: let basehome= substitute(home,'[/\\]\.vim$','','')
- line 8: if isdirectory(basehome) && filewritable(basehome)
- line 9: let home= basehome."/.vim"
- line 10: break
- line 11: endif
- line 12: endfor
- line 13: if home == ""
- line 14: " just pick the first directory
- line 15: let home= substitute(&rtp,',.*$','','')
- line 16: endif
- line 17: if (has("win32") || has("win95") || has("win64") || has("win16"))
- line 18: let home= substitute(home,'/','\\','g')
- line 19: endif
- line 20: endif
- line 21: " insure that the home directory exists
- line 22: if !isdirectory(home)
- line 23: if exists("g:netrw_mkdir")
- line 24: call system(g:netrw_mkdir." ".shellescape(home))
- line 25: else
- line 26: call mkdir(home)
- line 27: endif
- line 28: endif
- line 29: let g:netrw_home= home
- line 30: return home
- function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwHome returning '/Users/sjl/.vim'
- continuing in function <SNR>63_NetrwBookHistSave
- line 8: 1split
- chdir(/Users/sjl/src/lol)
- line 9: call s:NetrwEnew()
- calling function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew()
- line 1: " call Dfunc("s:NetrwEnew() a:0=".a:0." bufnr($)=".bufnr("$"))
- line 2: " call Decho("curdir<".((a:0>0)? a:1 : "")."> buf#".bufnr("%")."<".bufname("%").">")
- line 3:
- line 4: " grab a function-local-variable copy of buffer variables
- line 5: " call Decho("make function-local copy of netrw variables")
- line 6: if exists("b:netrw_bannercnt") |let netrw_bannercnt = b:netrw_bannercnt |endif
- line 6: let netrw_bannercnt = b:netrw_bannercnt |endif
- line 6: endif
- line 7: if exists("b:netrw_browser_active") |let netrw_browser_active = b:netrw_browser_active |endif
- line 7: let netrw_browser_active = b:netrw_browser_active |endif
- line 7: endif
- line 8: if exists("b:netrw_cpf") |let netrw_cpf = b:netrw_cpf |endif
- line 8: let netrw_cpf = b:netrw_cpf |endif
- line 8: endif
- line 9: if exists("b:netrw_curdir") |let netrw_curdir = b:netrw_curdir |endif
- line 9: let netrw_curdir = b:netrw_curdir |endif
- line 9: endif
- line 10: if exists("b:netrw_explore_bufnr") |let netrw_explore_bufnr = b:netrw_explore_bufnr |endif
- line 10: let netrw_explore_bufnr = b:netrw_explore_bufnr |endif
- line 10: endif
- line 11: if exists("b:netrw_explore_indx") |let netrw_explore_indx = b:netrw_explore_indx |endif
- line 11: let netrw_explore_indx = b:netrw_explore_indx |endif
- line 11: endif
- line 12: if exists("b:netrw_explore_line") |let netrw_explore_line = b:netrw_explore_line |endif
- line 12: let netrw_explore_line = b:netrw_explore_line |endif
- line 12: endif
- line 13: if exists("b:netrw_explore_list") |let netrw_explore_list = b:netrw_explore_list |endif
- line 13: let netrw_explore_list = b:netrw_explore_list |endif
- line 13: endif
- line 14: if exists("b:netrw_explore_listlen")|let netrw_explore_listlen = b:netrw_explore_listlen|endif
- line 14: let netrw_explore_listlen = b:netrw_explore_listlen|endif
- line 14: endif
- line 15: if exists("b:netrw_explore_mtchcnt")|let netrw_explore_mtchcnt = b:netrw_explore_mtchcnt|endif
- line 15: let netrw_explore_mtchcnt = b:netrw_explore_mtchcnt|endif
- line 15: endif
- line 16: if exists("b:netrw_fname") |let netrw_fname = b:netrw_fname |endif
- line 16: let netrw_fname = b:netrw_fname |endif
- line 16: endif
- line 17: if exists("b:netrw_lastfile") |let netrw_lastfile = b:netrw_lastfile |endif
- line 17: let netrw_lastfile = b:netrw_lastfile |endif
- line 17: endif
- line 18: if exists("b:netrw_liststyle") |let netrw_liststyle = b:netrw_liststyle |endif
- line 18: let netrw_liststyle = b:netrw_liststyle |endif
- line 18: endif
- line 19: if exists("b:netrw_method") |let netrw_method = b:netrw_method |endif
- line 19: let netrw_method = b:netrw_method |endif
- line 19: endif
- line 20: if exists("b:netrw_option") |let netrw_option = b:netrw_option |endif
- line 20: let netrw_option = b:netrw_option |endif
- line 20: endif
- line 21: if exists("b:netrw_prvdir") |let netrw_prvdir = b:netrw_prvdir |endif
- line 21: let netrw_prvdir = b:netrw_prvdir |endif
- line 21: endif
- line 22:
- line 23: keepj call s:NetrwOptionRestore("w:")
- calling function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew..<SNR>63_NetrwOptionRestore('w:')
- line 1: " call Dfunc("s:NetrwOptionRestore(vt<".a:vt.">) win#".winnr()." buf#".bufnr("%")." winnr($)=".winnr("$"))
- line 2: if !exists("{a:vt}netrw_optionsave")
- line 3: " call Decho("ro=".&l:ro." ma=".&l:ma." mod=".&l:mod." wrap=".&l:wrap)
- line 4: " call Dret("s:NetrwOptionRestore : ".a:vt."netrw_optionsave doesn't exist")
- line 5: return
- function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew..<SNR>63_NetrwOptionRestore returning #0
- continuing in function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew
- line 24: " call Decho("generate a buffer with keepjumps keepalt enew!")
- line 25: let netrw_keepdiff= &l:diff
- line 26: " COMBAK: Benzinger: using tree mode, vim -o Foo/ file shows Foo/ Foo/ instead. Place return here, problem goes away (beeps result, but who knows)
- line 27: " call Dredir("Benzinger 1:","ls!")
- line 28: keepj keepalt enew!
- line 28: unlet! b:keymap_name
- line 29: " call Dredir("Benzinger 2:","ls!")
- line 30: " COMBAK: Benzinger: using tree mode, vim -o Foo/ file shows Foo/ Foo/ instead. Place return here, problem remains.
- line 31: let &l:diff= netrw_keepdiff
- line 32: " call Decho("bufnr($)=".bufnr("$"))
- line 33: keepj call s:NetrwOptionSave("w:")
- calling function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew..<SNR>63_NetrwOptionSave('w:')
- line 1: " call Dfunc("s:NetrwOptionSave(vt<".a:vt.">) win#".winnr()." buf#".bufnr("%")."<".bufname(bufnr("%")).">"." winnr($)=".winnr("$"))
- line 2:
- line 3: " call Decho(a:vt."netrw_optionsave".(exists("{a:vt}netrw_optionsave")? ("=".{a:vt}netrw_optionsave) : " doesn't exist"))
- line 4: if !exists("{a:vt}netrw_optionsave")
- line 5: let {a:vt}netrw_optionsave= 1
- line 6: else
- line 7: " call Dret("s:NetrwOptionSave : options already saved")
- line 8: return
- line 9: endif
- line 10: " call Decho("fo=".&fo.(exists("&acd")? " acd=".&acd : " acd doesn't exist")." diff=".&l:diff)
- line 11:
- line 12: " Save current settings and current directory
- line 13: let s:yykeep = @@
- line 14: if exists("&l:acd")
- line 15: let {a:vt}netrw_acdkeep = &l:acd
- line 16: endif
- line 17: let {a:vt}netrw_aikeep = &l:ai
- line 18: let {a:vt}netrw_awkeep = &l:aw
- line 19: let {a:vt}netrw_bombkeep = &l:bomb
- line 20: let {a:vt}netrw_cikeep = &l:ci
- line 21: let {a:vt}netrw_cinkeep = &l:cin
- line 22: let {a:vt}netrw_cinokeep = &l:cino
- line 23: let {a:vt}netrw_comkeep = &l:com
- line 24: let {a:vt}netrw_cpokeep = &l:cpo
- line 25: let {a:vt}netrw_diffkeep = &l:diff
- line 26: if g:netrw_keepdir
- line 27: let {a:vt}netrw_dirkeep = getcwd()
- line 28: endif
- line 29: let {a:vt}netrw_fokeep = &l:fo " formatoptions
- line 30: let {a:vt}netrw_gdkeep = &l:gd " gdefault
- line 31: let {a:vt}netrw_hidkeep = &l:hidden
- line 32: let {a:vt}netrw_imkeep = &l:im
- line 33: let {a:vt}netrw_magickeep = &l:magic
- line 34: let {a:vt}netrw_repkeep = &l:report
- line 35: let {a:vt}netrw_selkeep = &l:sel
- line 36: let {a:vt}netrw_spellkeep = &l:spell
- line 37: let {a:vt}netrw_twkeep = &l:tw " textwidth
- line 38: let {a:vt}netrw_wigkeep = &l:wig " wildignore
- line 39: if has("win32") && !has("win95")
- line 40: let {a:vt}netrw_swfkeep = &l:swf " swapfile
- line 41: endif
- line 42: if &go =~# 'a' | sil! let {a:vt}netrw_regstar = @* | endif
- line 42: sil! let {a:vt}netrw_regstar = @* | endif
- line 42: endif
- line 43: sil! let {a:vt}netrw_regslash= @/
- line 44:
- line 45: " call Dret("s:NetrwOptionSave : win#".winnr()." buf#".bufnr("%"))
- function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew..<SNR>63_NetrwOptionSave returning #0
- continuing in function <SNR>63_NetrwBookHistSave..<SNR>63_NetrwEnew
- line 34:
- line 35: " copy function-local-variables to buffer variable equivalents
- line 36: " call Decho("copy function-local variables back to buffer netrw variables")
- line 37: if exists("netrw_bannercnt") |let b:netrw_bannercnt = netrw_bannercnt |endif
- line 37: let b:netrw_bannercnt = netrw_bannercnt |endif
- line 37: endif
- line 38: if exists("netrw_browser_active") |let b:netrw_browser_active = netrw_browser_active |endif
- line 38: let b:netrw_browser_active = netrw_browser_active |endif
- line 38: endif
- line 39: if exists("netrw_cpf") |let b:netrw_cpf = netrw_cpf |endif
- line 39: let b:netrw_cpf = netrw_cpf |endif
- line 39: endif
- line 40: if exists("netrw_curdir") |let b:netrw_curdir = netrw_curdir |endif
- line 40: let b:netrw_curdir = netrw_curdir |endif
- line 40: endif
- line 41: if exists("netrw_explore_bufnr") |let b:netrw_explore_bufnr = netrw_explore_bufnr |endif
- line 41: let b:netrw_explore_bufnr = netrw_explore_bufnr |endif
- line 41: endif
- line 42: if exists("netrw_explore_indx") |let b:netrw_explore_indx = netrw_explore_indx |endif
- line 42: let b:netrw_explore_indx = netrw_explore_indx |endif
- line 42: endif
- line 43: if exists("netrw_explore_line") |let b:netrw_explore_line = netrw_explore_line |endif
- line 43: let b:netrw_explore_line = netrw_explore_line |endif
- line 43: endif
- line 44: if exists("netrw_explore_list") |let b:netrw_explore_list = netrw_explore_list |endif
- line 44: let b:netrw_explore_list = netrw_explore_list |endif
- line 44: endif
- line 45: if exists("netrw_explore_listlen")|let b:netrw_explore_listlen = netrw_explore_listlen|endif
- line 45: let b:netrw_explore_listlen = netrw_explore_listlen|endif
- line 45: endif
- line 46: if exists("netrw_explore_mtchcnt")|let b:netrw_explore_mtchcnt = netrw_explore_mtchcnt|endif
- line 46: let b:netrw_explore_mtchcnt = netrw_explore_mtchcnt|endif
- line 46: endif
- line 47: if exists("netrw_fname") |let b:netrw_fname = netrw_fname |endif
- line 47: let b:netrw_fname = netrw_fname |endif
- line 47: endif
- line 48: if exists("netrw_lastfile") |let b:netrw_lastfile = netrw_lastfile |endif
- line 48: let b:netrw_lastfile = netrw_lastfile |endif
- line 48: endif
- line 49: if exists("netrw_liststyle") |let b:netrw_liststyle = netrw_liststyle |endif
- line 49: let b:netrw_liststyle = netrw_liststyle |endif
- line 49: endif
- line 50: if exists("netrw_method") |let b:netrw_method = netrw_method |endif
- line 50: let b:netrw_method = netrw_method |endif
- line 50: endif
- line 51: if exists("netrw_option") |let b:netrw_option = netrw_option |endif
- line 51: let b:netrw_option = netrw_option |endif
- line 51: endif
- line 52: if exists("netrw_prvdir") |let b:netrw_prvdir = netrw_prvdir |endif
- line 52: let b:netrw_prvdir = netrw_prvdir |endif
- line 52: endif
- line 53:
- line 5
Add Comment
Please, Sign In to add comment