Fix inravina client reference

Author: yitzchak

src/lisp/kernel/lsp/format-pprint.lisp

@@ -470,7 +470,7 @@
 
 (defmethod print-object ((obj structure-object) stream)
   (if *print-pretty*
-      (inravina:pprint-structure-object inravina-intrinsic:*client* stream obj)
+      (inravina:pprint-structure-object inravina-shim:*client* stream obj)
       (clos::print-structure-object obj stream)))
 
 #-clasp-min