From b841204b98e9f856fe402281fcc05697319eb02e Mon Sep 17 00:00:00 2001
From: Jean Privat <jean@pryen.org>
Date: Thu, 25 Jul 2013 13:26:57 -0400
Subject: [PATCH] phase: add `Phase#process_annotated_node`

Signed-off-by: Jean Privat <jean@pryen.org>
---
 src/phase.nit |   28 ++++++++++++++++++++++++++--
 1 file changed, 26 insertions(+), 2 deletions(-)

diff --git a/src/phase.nit b/src/phase.nit
index df35038..70d3a71 100644
--- a/src/phase.nit
+++ b/src/phase.nit
@@ -70,6 +70,12 @@ redef class ToolContext
 					self.check_errors
 					break
 				end
+				var v = new AnnotationPhaseVisitor(phase)
+				v.enter_visit(nmodule)
+				if errcount != self.error_count then
+					self.check_errors
+					break
+				end
 			end
 			self.check_errors
 		end
@@ -79,9 +85,22 @@ redef class ToolContext
 	end
 end
 
+private class AnnotationPhaseVisitor
+	super Visitor
+
+	var phase: Phase
+
+	init(phase: Phase) do self.phase = phase
+
+	redef fun visit(n)
+	do
+		n.visit_all(self)
+		if n isa AAnnotation then phase.process_annotated_node(n.parent.parent.as(not null), n)
+	end
+end
+
 # Abstraction of steps in the analysis/processing of Nit programs
-# Specific phases should implements either `process_nmodule` or
-# `process_npropdef`.
+# Specific phases should implements one of the `process_*` method
 abstract class Phase
 	# The toolcontext instance attached to the phase
 	var toolcontext: ToolContext
@@ -109,4 +128,9 @@ abstract class Phase
 	# Note that the order of the visit is the one of the file
 	# @toimplement
 	fun process_npropdef(npropdef: APropdef) do end
+
+	# Specific actions to execute on annotated nodes
+	# Note that the order of the visit is the one of the file
+	# @toimplement
+	fun process_annotated_node(node: ANode, nat: AAnnotation) do end
 end
-- 
1.7.9.5