A Reflective Architecture for the Support of Aspect-Oriented Programming in Smalltalk