X-Git-Url: https://git.martlubbers.net/?p=cloogle-irc.git;a=blobdiff_plain;f=cloogleirc.icl;fp=cloogleirc.icl;h=a504883baca3dac85abd8ede4823879692decba8;hp=09ad2f3d1a8ee6546035fc8448f10b3e2162af6a;hb=9d3f47b4dfbfcda74e3615361e858d156e3ef395;hpb=898c1d5cf59a5b3e1cdf6002db766c10f9d1a00e

diff --git a/cloogleirc.icl b/cloogleirc.icl
index 09ad2f3..a504883 100644
--- a/cloogleirc.icl
+++ b/cloogleirc.icl
@@ -87,6 +87,9 @@ cloogle data w
 				+++ toString (length class_funs) +++ " class functions"
 		processResult (ModuleResult (br, _))
 			= "Module in " +++ br.library +++ ": " +++ br.modul
+		processResult (SyntaxResult (br, re))
+			= "Clean syntax: " +++ re.syntax_title +++ "\n"
+				+++ concat (intersperse "; " re.syntax_code)
 
 		limitResults :: String -> String
 		limitResults s