remove `flet*' elisp special form

* module/language/elisp/compile-tree-il.scm (compile-flet*): Remove.
* module/language/elisp/runtime/function-slot.scm: Update module
  definition.
* test-suite/tests/elisp-compiler.test
  ("Lambda Expressions")["flet and flet*"]: Remove `flet*' test.

module/language/elisp/compile-tree-il.scm

@@ -41,7 +41,6 @@
             compile-flet
             compile-let*
             compile-lexical-let*
-            compile-flet*
             compile-guile-ref
             compile-guile-primitive
             compile-while
@@ -255,7 +254,7 @@
             (iterate (cdr tail) lexical (cons (car tail) dynamic))))))
 
 ;;; Compile let and let* expressions.  The code here is used both for
-;;; let/let* and flet/flet*, just with a different bindings module.
+;;; let/let* and flet, just with a different bindings module.
 ;;;
 ;;; A special module value 'lexical means that we're doing a lexical-let
 ;;; instead and the bindings should not be saved to globals at all but
@@ -698,11 +697,6 @@
     ((,bindings . ,body)
      (generate-let* loc 'lexical bindings body))))
 
-(defspecial flet* (loc args)
-  (pmatch args
-    ((,bindings . ,body)
-     (generate-let* loc function-slot bindings body))))
-
 ;;; guile-ref allows building TreeIL's module references from within
 ;;; elisp as a way to access data within the Guile universe.  The module
 ;;; and symbol referenced are static values, just like (@ module symbol)

module/language/elisp/runtime/function-slot.scm

@@ -32,7 +32,6 @@
                  (compile-flet . flet)
                  (compile-let* . let*)
                  (compile-lexical-let* . lexical-let*)
-                 (compile-flet* . flet*)
                  (compile-guile-ref . guile-ref)
                  (compile-guile-primitive . guile-primitive)
                  (compile-while . while)
@@ -56,7 +55,6 @@
                flet
                let*
                lexical-let*
-               flet*
                guile-ref
                guile-primitive
                while