From: Camil Staps <info@camilstaps.nl>
Date: Thu, 26 Apr 2018 12:21:17 +0000 (+0200)
Subject: Add ABCInstructionResult and ProblemResult formats
X-Git-Url: https://git.martlubbers.net/?a=commitdiff_plain;h=747d99d348372cd62ff9362f7b98313eb53c0ea9;p=cloogle-irc.git

Add ABCInstructionResult and ProblemResult formats
---

diff --git a/cloogleirc.icl b/cloogleirc.icl
index 534a57a..717cfd8 100644
--- a/cloogleirc.icl
+++ b/cloogleirc.icl
@@ -90,6 +90,11 @@ cloogle data w
 		processResult (SyntaxResult (br, re))
 			= "Clean syntax: " +++ re.syntax_title +++ "\n"
 				+++ concat (intersperse "; " re.syntax_code)
+		processResult (ABCInstructionResult (br, re))
+			= "ABC instruction: " +++ re.abc_instruction
+		processResult (ProblemResult pr)
+			= "Common problem: " +++ pr.problem_title
+				+++ "; see https://github.com/clean-cloogle/common-problems/blob/master/" +++ pr.problem_key +++ ".md"
 
 		limitResults :: String -> String
 		limitResults s