From: dopefishh <mart@martlubbers.net>
Date: Thu, 26 Apr 2018 12:34:57 +0000 (+0200)
Subject: Merge pull request #19 from clean-cloogle/add-result-types
X-Git-Url: https://git.martlubbers.net/?p=cloogle-irc.git;a=commitdiff_plain;h=4e4cfa653ac3470d0a90fe0b89a4662d506dc615;hp=38119fcb7be8437bc535665f20af8b641ee67e64

Merge pull request #19 from clean-cloogle/add-result-types

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