guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] branch wip-elisp-rebased updated: remove uses of define-


From: Robin Templeton
Subject: [Guile-commits] branch wip-elisp-rebased updated: remove uses of define-inlinable
Date: Fri, 13 Dec 2024 22:55:51 -0500

This is an automated email from the git hooks/post-receive script.

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

The following commit(s) were added to refs/heads/wip-elisp-rebased by this push:
     new ece0f4e78 remove uses of define-inlinable
ece0f4e78 is described below

commit ece0f4e7823f055a0a08a8b83e1ec4f078877723
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_)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]