(octopus) ➜ src git:(master) ✗ ghc -o solidity-cfg-builder Main.hs
[7 of 9] Compiling CFG.Parsing ( CFG/Parsing.hs, CFG/Parsing.o )
CFG/Parsing.hs:6:1: error:
Could not find module ‘Text.Parsec.Number’
Perhaps you meant
Text.Parsec.Char (from parsec-3.1.13.0)
Text.Parsec.Error (from parsec-3.1.13.0)
Text.Parsec.Expr (from parsec-3.1.13.0)
Use -v to see a list of the files searched for.
|
6 | import Text.Parsec.Number
| ^^^^^^^^^^^^^^^^^^^^^^^^^
parsec是3.1.13，但是找不到模块Text.Parsec.Number
答案 0 :(得分：0)
Private Sub Worksheet_Change(ByVal Target As Range)
If WorksheetFunction.CountIf(Range("c1:c12"), Target.Offset(0, 1).Value) > 1 And _
Target.Offset(0, 1).Value <> " " Then
MsgBox Target.Offset(0, 1).Value & " is a Duplicate Entry" & vbNewLine & _
" ENTER A NEW NAME", vbInformation, "Duplicate Detected"
Target.Offset(0, 0).Value = " "
Target.Offset(0, 0).Select
ElseIf WorksheetFunction.CountIf(Range("c1:c12"), Target.Offset(0, 2).Value) > 1 And _
Target.Offset(0, 1).Value <> " " Then
MsgBox Target.Offset(0, 2).Value & " is a Duplicate Entry" & vbNewLine & _
" ENTER A NEW NAME", vbInformation, "Duplicate Detected"
Target.Offset(0, 0).Value = " "
Target.Offset(0, 0).Select
Else: Exit Sub
End If
End Sub中没有Text.Parsec.Number，但是有parsec是Text.Parsec.Number包中Text.ParserCombinators.Parsec.Number的副本。