" Forth
au BufNewFile,BufRead *.ft,*.fth setf forth
-" F# or Forth
-au BufNewFile,BufRead *.fs call dist#ft#FTfs()
-
" Reva Forth
au BufNewFile,BufRead *.frt setf reva
" FStab
au BufNewFile,BufRead fstab,mtab setf fstab
+" F# or Forth
+au BufNewFile,BufRead *.fs call dist#ft#FTfs()
+
+" F#
+au BufNewFile,BufRead *.fsi,*.fsx setf fsharp
+
" GDB command files
au BufNewFile,BufRead .gdbinit,gdbinit setf gdb
\ 'fpcmake': ['file.fpc'],
\ 'framescript': ['file.fsl'],
\ 'freebasic': ['file.fb', 'file.bi'],
- \ 'fs': ['file.fs'],
+ \ 'fsharp': ['file.fs', 'file.fsi', 'file.fsx'],
\ 'fstab': ['fstab', 'mtab'],
\ 'fvwm': ['/.fvwm/file', 'any/.fvwm/file'],
\ 'gdb': ['.gdbinit', 'gdbinit'],
call writefile(['looks like F#'], 'Xfile.fs')
split Xfile.fs
- call assert_equal('fs', &filetype)
+ call assert_equal('fsharp', &filetype)
bwipe!
let g:filetype_fs = 'forth'