Small cleanup in buildFunctor.

git-svn-id: svn://svn.code.sf.net/p/open-axiom/code/trunk@3003 f499efd5-9937-0410-b36a-d3739c31ded8