Turbo51 - Free Pascal compiler for 8051
Sorry for language, I hope you will understand.
Those who still use 8051 and like programming in Pascal please take a look at Turbo51 - a free Pascal compiler for the 8051 family of microcontrollers:
It features a fast single pass optimizing compiler, Borland Turbo Pascal 7 syntax, full floating point support, mixed pascal and assembler programming, full use of register banks, advanced multi-pass optimizer, smart linker, generates compact high quality code, output formats include binary, Intel HEX, OMF-51 and assembler source. Source level debugging possible with extended absolute object file.
Give it a try!