Created
October 2, 2011 00:16
-
-
Save sjl/1256851 to your computer and use it in GitHub Desktop.
SLIMV Segfault Logs
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 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 <[email protected]> | |
| line 4: " URL:^I^I http://iamphet.nm.ru/vim | |
| line 5: " Original author: Dorai Sitaram <[email protected]> | |
| 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 <[email protected]> | |
| line 4: " URL:^I^I http://iamphet.nm.ru/vim | |
| line 5: " Original author: Dorai Sitaram <[email protected]> | |
| 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 <[email protected]> | |
| 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. <[email protected]> | |
| 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 <[email protected]> | |
| 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 <[email protected]> | |
| 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 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [---Sent---] 0.500587 | |
| (:emacs-rex (swank:connection-info) nil t 1) | |
| [-Received-] 0.503415 | |
| (:indentation-update (("with-window" . 0) ("with-output-to-printer" . 1) ("define-setf-method" . 2) ("letf*" . 1) ("letf" . 1) ("muffle-cerrors" . 0) ("without-global-handlers" . 0) ("with-http-output" . 1) ("with-collect" . 1) ("with-http-input" . 1) ("without-package-lock" . 1) ("appease-cerrors" . 0) ("with-restarts" . 1) ("fcase" . 2) ("exit-on-error" . 0) ("with-keyboard" . 0) ("doseq" . 1) ("without-floating-point-underflow" . 0) ("with-gensyms" . 1) ("with-html-output" . 1) ("dohash" . 1) ("abort-on-error" . 0) ("generic-flet" . 1) ("generic-labels" . 1) ("formatter-bind-terminator" . 0) ("with-augmented-load-path" . 1) ("with-no-package-lock-internal" . 1) ("try-eval" . 0) ("eval-when-compile" . 0) ("with-stream-s-expression" . 1) ("formatter-bind-args" . 0) ("formatter-bind-block" . 0) ("with-fill-stream" . 1) ("defformat-simple" . 3) ("predefun" . 2) ("predefmacro" . 2) ("simple-destructuring-bind" . 2) ("formatter-bind-terminators" . 0) ("defmacro-special" . 0) ("with-abort-restart" . 1) ("with-slots" . 2) ("with-accessors" . 2) ("defmacro" . 2) ("deftype" . 2) ("define-setf-expander" . 2) ("defun" . 2) ("define-compiler-macro" . 2) ("with-stream-lock" . 1) ("with-loop-split" . 1) ("with-compilation-hooks" . 1) ("with-struct" . 2) ("when-let" . 1) ("converting-errors-to-error-location" . 0) ("compile-file-frobbing-notes" . 1) ("with-slime-output-stream" . 1) ("dynamic-flet" . 1) ("defimplementation" . 2) ("with-monitoring" . 2) ("with-time/cons" . 2) ("match" . 1) ("with-struct*" . 1) ("with-arglist-io-syntax" . 0) ("with-swank-error-handler" . 1) ("with-panic-handler" . 1) ("without-slime-interrupts" . 0) ("with-io-redirection" . 1) ("with-top-level-restart" . 1) ("with-describe-settings" . 1) ("presenting-object-if" . 3) ("presenting-object" . 2) ("without-printing-errors" . 1) ("with-available-arglist" . 2) ("with-bindings" . 1) ("define-channel-method" . 2) ("with-retry-restart" . 1) ("do-decoded-arglist" . 1) ("do-symbols*" . 1) ("with-connection" . 1) ("with-buffer-syntax" . 1) ("with-slime-interrupts" . 0) ("do-checklist" . 1) ("defslimefun" . 2) ("with-string-stream" . 1))) | |
| [-Received-] 0.508611 | |
| (:return (:ok (:pid 73832 :style nil :encoding (:coding-system "utf-8-unix" :external-format "#<ENCODING UTF-8 UNIX>") :lisp-implementation (:type "CLISP" :name "clisp" :version "2.49 (2010-07-07) (built 3526502521) (memory 3526502816)" :program nil) :machine (:instance "grendel.local [192.168.0.9]" :type "X86_64" :version "X86_64") :features (:swank :regexp :syscalls :i18n :loop :compiler :clos :mop :clisp :ansi-cl :common-lisp :lisp=cl :interpreter :sockets :generic-streams :logical-pathnames :screen :unicode :base-char=character :word-size=64 :unix :macos) :modules ("SWANK-PACKAGE-FU" "SWANK-PRESENTATION-STREAMS" "SWANK-PRESENTATIONS" "SWANK-FANCY-INSPECTOR" "SWANK-FUZZY" "SWANK-ARGLISTS" "SWANK-C-P-C" "regexp" "syscalls" "i18n") :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2011-03-13")) 1) | |
| [Actionlist] 0.509628 | |
| 1: finished :connection-info | |
| params: [':pid', '73832', ':style', 'nil', ':encoding', [':coding-system', '"utf-8-unix"', ':external-format', '"#<ENCODING UTF-8 UNIX>"'], ':lisp-implementation', [':type', '"CLISP"', ':name', '"clisp"', ':version', '"2.49 (2010-07-07) (built 3526502521) (memory 3526502816)"', ':program', 'nil'], ':machine', [':instance', '"grendel.local [192.168.0.9]"', ':type', '"X86_64"', ':version', '"X86_64"'], ':features', [':swank', ':regexp', ':syscalls', ':i18n', ':loop', ':compiler', ':clos', ':mop', ':clisp', ':ansi-cl', ':common-lisp', ':lisp=cl', ':interpreter', ':sockets', ':generic-streams', ':logical-pathnames', ':screen', ':unicode', ':base-char=character', ':word-size=64', ':unix', ':macos'], ':modules', ['"SWANK-PACKAGE-FU"', '"SWANK-PRESENTATION-STREAMS"', '"SWANK-PRESENTATIONS"', '"SWANK-FANCY-INSPECTOR"', '"SWANK-FUZZY"', '"SWANK-ARGLISTS"', '"SWANK-C-P-C"', '"regexp"', '"syscalls"', '"i18n"'], ':package', [':name', '"COMMON-LISP-USER"', ':prompt', '"CL-USER"'], ':version', '"2011-03-13"'] | |
| Package:COMMON-LISP-USER Prompt:CL-USER |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment