test11.in
上传用户:gddssl
上传日期:2007-01-06
资源大小:1003k
文件大小:2k
源码类别:

编辑器/阅读器

开发平台:

DOS

  1. Tests for autocommands:
  2. - FileWritePre writing a compressed file
  3. - FileReadPost reading a compressed file
  4. - BufNewFile reading a file template
  5. - BufReadPre decompressing the file to be read
  6. - FilterReadPre substituting characters in the temp file
  7. - FilterReadPost substituting characters after filtering
  8. - FileReadPre set options for decompression
  9. - FileReadPost decompress the file
  10. Note: This test will fail if "gzip" is not available.
  11. STARTTEST
  12. :set bin
  13. :au FileWritePre    *.gz   '[,']!gzip
  14. :au FileWritePost   *.gz   undo
  15. :/start of testfile/,/end of testfile/w! Xtestfile.gz
  16. :au FileReadPost    *.gz   '[,']!gzip -d
  17. :$r Xtestfile.gz                " Read and decompress the testfile
  18. :?startstart?,$w! test.out      " Write contents of this file
  19. :au BufNewFile      *.c    read Xtest.c
  20. gg/^end of testfile
  21. :/start of test.c/+1,/end of test.c/-1w! Xtest.c
  22. :e! foo.c                       " Will load Xtest.c
  23. :au FileAppendPre   *.out  '[,']s/new/NEW/
  24. :au FileAppendPost  *.out  !cat Xtest.c >>test.out
  25. :w>>test.out                    " Append it to the output file
  26. :au! FileAppendPre
  27. :" setup autocommands to decompress before reading and re-compress afterwards
  28. :au BufReadPre      *.gz   !gzip -d <afile>
  29. :au BufReadPre      *.gz   !mv <afile>:r <afile>
  30. :au BufReadPost     *.gz   !mv <afile> <afile>:r
  31. :au BufReadPost     *.gz   !gzip <afile>:r
  32. :e! Xtestfile.gz                " Edit compressed file
  33. :w>>test.out                    " Append it to the output file
  34. :au FilterReadPre   *.out  !mv <afile> <afile>.t
  35. :au FilterReadPre   *.out  !sed s/e/E/ <afile>.t ><afile>
  36. :au FilterReadPre   *.out  !rm <afile>.t
  37. :au FilterReadPost  *.out  '[,']s/x/X/g
  38. :e! test.out                    " Edit the output file
  39. :23,$!cat
  40. :au! FileReadPre    *.gz   !gzip -d <afile>
  41. :au  FileReadPre    *.gz   !mv <afile>:r <afile>
  42. :au! FileReadPost   *.gz   '[,']s/l/L/
  43. :$r Xtestfile.gz             " Read compressed file
  44. :w                           " write it, after filtering
  45. :!rm Xtestfile.gz Xtest.c
  46. :qa!
  47. ENDTEST
  48. startstart
  49. start of testfile
  50. line 2 Abcdefghijklmnopqrstuvwxyz
  51. line 3 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  52. line 4 Abcdefghijklmnopqrstuvwxyz
  53. line 5 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  54. line 6 Abcdefghijklmnopqrstuvwxyz
  55. line 7 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  56. line 8 Abcdefghijklmnopqrstuvwxyz
  57. line 9 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  58. line 10 Abcdefghijklmnopqrstuvwxyz
  59. end of testfile
  60. start of test.c
  61. /*
  62.  * Here is a new .c file
  63.  */
  64. end of test.c