Skip to content

Instantly share code, notes, and snippets.

@sozysozbot
Created September 14, 2018 13:59
Show Gist options
  • Save sozysozbot/cd2b16dcb78e72417dbf9f6371798bf0 to your computer and use it in GitHub Desktop.
Save sozysozbot/cd2b16dcb78e72417dbf9f6371798bf0 to your computer and use it in GitHub Desktop.
CommonIO.hs:20: putStrLn' English $ NormalMessage $ "\nparsing " ++ filepath ++ ":\n"
Execute.hs:64: then runtimeError $ "f5 register was not preserved after the call. It should be in " ++ show initialF5 ++ " but is actually in " ++ show a
Execute.hs:276: Nothing -> runtimeError $ "Undefined label `" ++ unLabel label ++ "`"
Execute.hs:276: Nothing -> runtimeError $ "Undefined label `" ++ unLabel label ++ "`"
Execute.hs:309: | otherwise -> runtimeError $ "nx has an invalid address " ++ show currentNX
Linker.hs:23: Left _ -> Left $ LinkError "multiple files lack `kue`"
Linker.hs:25: Nothing -> Left $ LinkError "all files have `kue`"
Linker.hs:37: "conflict: different files export the same label(s) `" ++ intercalate ", " (map unLabel labels) ++ "“"
Linker.hs:45-46: "conflict: cannot import label(s) `" ++ intercalate ", " (map unLabel xokConflicts) ++ "` that is already defined in the file"
Linker.hs:50-51: "cannot export label(s) `" ++ intercalate ", " (map unLabel kueWithoutEvidence) ++ "` that is not defined in the file"
Messages.hs:16: show' English (LinkError str) = "LinkError: " ++ str
Messages.hs:19: show' English (ParseError str) = "ParseError: " ++ str
Messages.hs:22: show' English (RuntimeError str str2) = "RuntimeError: " ++ str ++ str2
Parse.hs:72:beautify [_,"+"] = left "Unexpected + at the end of input"
Parse.hs:73:beautify ("+":_) = left "Unexpected + at the beginning of input"
Parse.hs:74:beautify ("@":_) = left "Unexpected @ at the beginning of input"
Parse.hs:87:normalize [(Nothing,_)] = left "l' must be preceded by an instruction"
Parse.hs:148: [] -> lift $ left "nll must be followed by an instruction"
Parse.hs:152: ((Nothing,_):_) -> lift $ left "nll must not be followed by l'"
Parse.hs:163:toI xs = lift $ left $ "Unparsable command sequence " ++ show xs
Parse.hs:167: Nothing -> lift $ left $ "`" ++ x ++ "` cannot be used as a valid label"
Parse.hs:177: parseRegister str = left $ "there is no register named `" ++ str ++ "`"
Parse.hs:185: | otherwise = left $ "cannot parse `" ++ str ++ "` as a valid data"
Parse.hs:206:parseL xs = left $ "cannot parse `" ++ xs ++ "` as a valid place to put data"
TentativeLoad.hs:29: Left $ LinkError "size limit of a single file was exceeded"
TentativeLoad.hs:32: Left labels -> Left $ LinkError $ "duplicating local label(s): " ++ intercalate ", " (map unLabel labels)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment