RR Software in Madison, Wisconsin has had an Ada to Pascal translator
in their product portfolio for a long time. It is called PASTRAN.
Phone number is: (608) 245-0375.
FYI. The RR in RR Software is not my initials. I am not affiliated
with RR Software except as a user of their products and an occasional
[log in to unmask]
AdaWorks Software Engineering
2555 Park Boulevard
Palo Alto, CA 94306