Digital's BASIC-PLUS on RSTS/E also compiled to an intermediate code that was interpreted. However, unlike P-code (or Infocom Z-code for that matter), it wasn't portable to other systems.