[Guile-commits] 36/36: remove uses of define-inlinable

[Robin Templeton]

bpt pushed a commit to branch wip-elisp-rebased
in repository guile.

commit 31baf3ef4626ff517c579e6a87b96ea80549ade4
Author: Robin Templeton <robin@terpri.org>
AuthorDate: Fri Dec 13 22:32:16 2024 -0500

    remove uses of define-inlinable
    
    * module/language/elisp/runtime.scm (ensure-present!, ensure-desc!)
    (schemify): Remove use of `define-inlinable'.
---
 module/language/elisp/runtime.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/module/language/elisp/runtime.scm 
b/module/language/elisp/runtime.scm
index bf5b36929..cf7524742 100644
--- a/module/language/elisp/runtime.scm
+++ b/module/language/elisp/runtime.scm
@@ -116,13 +116,13 @@
      thunk
      (lambda () (vector-set! x 4 old)))))
 
-(define-inlinable (ensure-present! module sym thunk)
+(define (ensure-present! module sym thunk)
   (or (module-local-variable module sym)
       (let ((variable (make-variable (thunk))))
         (module-add! module sym variable)
         variable)))
 
-(define-inlinable (ensure-desc! module sym)
+(define (ensure-desc! module sym)
   (ensure-present! module
                    sym
                    (lambda ()
@@ -130,7 +130,7 @@
                        (vector-set! x 0 sym)
                        x))))
 
-(define-inlinable (schemify symbol)
+(define (schemify symbol)
   (case symbol
     ((#nil) nil_)
     ((#t) t_)