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 <ro...@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_)
