rename a file and a structure because another file with the same name exists, except that one is lowercase and the other is uppercase. Case insensitive filesystems don't like that they had the same name before, except for the case.

This commit is contained in:
2025-09-02 02:14:12 +01:00
parent 75916234e6
commit 6d9ad9b13b
4 changed files with 9 additions and 9 deletions

View File

@@ -1,4 +1,4 @@
structure ViWORDDfa =
structure ViCapsWordDfa =
struct
val startState: Word8.word = 0w0
val startNonBlankState: Word8.word = 0w1

View File

@@ -600,29 +600,29 @@ struct
val nextWord = ViWordDfa.startOfNextWord
(* equivalent of vi's 'W' command *)
val nextWORD = ViWORDDfa.startOfNextWORD
val nextWORD = ViCapsWordDfa.startOfNextWORD
(* equivalent of vi's 'b' command *)
val prevWord = ViWordDfa.startOfCurrentWord
val prevWordStrict = ViWordDfa.startOfCurrentWordStrict
(* equivalent of vi's 'B' command *)
val prevWORD = ViWORDDfa.startOfCurrentWORD
val prevWORDStrict = ViWORDDfa.startOfCurrentWORDStrict
val prevWORD = ViCapsWordDfa.startOfCurrentWORD
val prevWORDStrict = ViCapsWordDfa.startOfCurrentWORDStrict
(* equivalent of vi's 'ge' command *)
val endOfPrevWord = ViWordDfa.endOfPrevWord
(* equivalent of vi's 'gE' command *)
val endOfPrevWORD = ViWORDDfa.endOfPrevWORD
val endOfPrevWORD = ViCapsWordDfa.endOfPrevWORD
(* equivalent of vi's `e` command *)
val endOfWord = ViWordDfa.endOfCurrentWord
val endOfWordForDelete = ViWordDfa.endOfCurrentWordForDelete
(* equivalent of vi's `E` command *)
val endOfWORD = ViWORDDfa.endOfCurrentWORD
val endOfWORDForDelete = ViWORDDfa.endOfCurrentWORDForDelete
val endOfWORD = ViCapsWordDfa.endOfCurrentWORD
val endOfWORDForDelete = ViCapsWordDfa.endOfCurrentWORDForDelete
(* Prerequisite:
* LineGap has been moved to start of line (provided with vi0). *)

View File

@@ -33,8 +33,8 @@ in
fcore/pipe-cursor.sml
fcore/text-builder.sml
fcore/cursor-dfa/make-dfa-loop.sml
fcore/cursor-dfa/vi-WORD-dfa.sml
fcore/cursor-dfa/vi-word-dfa.sml
fcore/cursor-dfa/vi-caps-word-dfa.sml
fcore/cursor-dfa/vi-dlr-dfa.sml
end
fcore/cursor.sml

View File

@@ -33,8 +33,8 @@ in
fcore/pipe-cursor.sml
fcore/text-builder.sml
fcore/cursor-dfa/make-dfa-loop.sml
fcore/cursor-dfa/vi-WORD-dfa.sml
fcore/cursor-dfa/vi-word-dfa.sml
fcore/cursor-dfa/vi-caps-word-dfa.sml
fcore/cursor-dfa/vi-dlr-dfa.sml
end
fcore/cursor.sml