remove unneeded function

This commit is contained in:
2025-08-03 16:52:55 +01:00
parent cc276b5454
commit cf93d5885f

View File

@@ -43,15 +43,6 @@ struct
, spaceAfterNonBlankTable , spaceAfterNonBlankTable
] ]
fun next (currentState, currentChar) =
let
val currentState = Word8.toInt currentState
val currentTable = Vector.sub (tables, currentState)
val charIdx = Char.ord currentChar
in
Vector.sub (currentTable, charIdx)
end
structure StartOfNextWORD = structure StartOfNextWORD =
MakeNextDfaLoop MakeNextDfaLoop
(struct (struct