equal
deleted
inserted
replaced
100 where |
100 where |
101 parsedProto = readInt_ protoNum |
101 parsedProto = readInt_ protoNum |
102 #endif |
102 #endif |
103 |
103 |
104 handleCmd_NotEntered (s:_) = return [ProtocolError $ "Incorrect command '" `B.append` s `B.append` "' (state: not entered)"] |
104 handleCmd_NotEntered (s:_) = return [ProtocolError $ "Incorrect command '" `B.append` s `B.append` "' (state: not entered)"] |
|
105 |
|
106 handleCmd_NotEntered [] = return [ProtocolError "Empty command (state: not entered)"] |