A compiler for a Structured Old Language