Re: Родная школа :)

[Mikolaj Golub <golub@inec.kharkov.com>]

On Tue, 21 Mar 2006 14:34:25 +0300 Alexander Danilov wrote:

 AD> Что касается vim для freepascal: на встроенном в vim языке можно за сравнительно короткое время
 AD> написать конфигурацию, которая будет очень сильно напоминать turbopascal ide, так сильно любимый
 AD> "программистами", я сам исследовал эту проблему. На vim.sf.net можно найти скрипт, который
 AD> правильно обрабатывает ошибки компилятора и устанавливает курсор на нужную строку.

Вот ребятенку делал когда-то:

В .vim/compiler/fpc.vim:

if exists("current_compiler")
    finish
endif
let current_compiler = "fpc"
setlocal errorformat=%f(%l\\,%c)%*[\ ]%t%*[^:]:\ %m
setlocal makeprg=fpc\ %

В ~/.vimrc:

autocmd BufNewFile,BufRead *.pas set autowrite
autocmd BufNewFile,BufRead *.pas compiler! fpc

Но это для программ, состоящих из одного файла.

Еще вот такое есть:

map <F9> :make<CR>:copen<CR>
imap <F9> :make<CR>:copen<CR>

Но как оказалось, зря :-), он почему-то предпочитает :!fpc %

Ага, для emacs тоже тогда делал:

(add-hook 'pascal-mode-hook 
  (function (lambda ()
      (set (make-local-variable 'compile-command)
	   (concat "fpc " buffer-file-name))
      (set (make-local-variable 'compilation-error-regexp-alist)
	   ;;hello.pas(8,3) Error: Identifier not found "WriteLnX"
	   '(("\\([^(\n]*\\)(\\([0-9]+\\),[ \t]*\\([0-9]+\\)" 1 2 3))))))

-- 
to my, trociny