Re: Connecting to an Already Running Scheme REPL with org-babel

[Hunter Jozwiak <hunter.t.joz@gmail.com>]

[-- Attachment #1.1: Type: text/plain, Size: 2079 bytes --]

On Mon, Jan 29, 2024 at 8:15 AM Ihor Radchenko <yantar92@posteo.net> wrote:

> Hunter Jozwiak <hunter.t.joz@gmail.com> writes:
>
> >   Here is a patch that provides this functionality.
>
> Thank you!
>
> > Subject: [PATCH] org-mode: allow ob-scheme to accept a remote connection.
> >
> > * lisp/org/ob-scheme.el (org-babel-scheme-get-repl): introduce two
> > optional variables  host  and port. If there are not given, just run
>            ^^^^^^^^^ arguments
>
> > * lisp/org/ob-scheme (org-babel-scheme-execute-with-geiser,
> > org-babel-execute:scheme): take these  optional arguments into
> > account.
>
> ... and add two new optional arguments.
>
> > @@ -231,6 +235,8 @@ org-babel-execute:scheme
> >                      geiser-scheme-implementation
> >                      geiser-default-implementation
> >                      (car geiser-active-implementations)))
> > +             (host (cdr (assq :host params)))
> > +             (port (cdr (assq :port params)))
>
> Please declare these new scheme-specific header argument in
> `org-babel-header-args:scheme'.
> See `org-babel-header-args:C' for an example.
> This is necessary for header argument completion to work.
>
> Also, please document the new header argument in the ob-scheme
> documentation at
> https://orgmode.org/worg/org-contrib/babel/languages/ob-doc-scheme.html
> (you can submit a patch against
>
> https://git.sr.ht/~bzg/worg/tree/master/item/org-contrib/babel/languages/ob-doc-scheme.org
> )
> Here is the worg patch.
> > -            (and (not (string= session "none")) session)))) ; session
> > +            (and (not (string= session "none")) session)  host port)))
> ; session
>
> This does not look right. Your change will disable session support
> completely when host and port are not provided.
>
> --
> Ihor Radchenko // yantar92,
> Org mode contributor,
> Learn more about Org mode at <https://orgmode.org/>.
> Support Org development at <https://liberapay.com/org-mode>,
> or support my work at <https://liberapay.com/yantar92>
>

[-- Attachment #1.2: Type: text/html, Size: 3231 bytes --]

[-- Attachment #2: 0001-ob-scheme-document-the-new-header-arguments.patch --]
[-- Type: text/x-patch, Size: 1114 bytes --]

From 2dc78a7edbbe38614a5f7fafa2c295f52528f04d Mon Sep 17 00:00:00 2001
From: Hunter Jozwiak <hunter.t.joz@gmail.com>
Date: Mon, 29 Jan 2024 12:48:41 -0500
Subject: [PATCH] ob-scheme: document  the new header arguments.

* org-contrib/babel/languages/ob-doc-scheme.org (header-arguments):
note the  new options :host and :port.
---
 org-contrib/babel/languages/ob-doc-scheme.org | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/org-contrib/babel/languages/ob-doc-scheme.org b/org-contrib/babel/languages/ob-doc-scheme.org
index 46315d82..8f7ef52a 100644
--- a/org-contrib/babel/languages/ob-doc-scheme.org
+++ b/org-contrib/babel/languages/ob-doc-scheme.org
@@ -71,7 +71,9 @@ pair to =org-babel-load-languages=:
 There are no language-specific default values for header arguments to
 Scheme code blocks.
 
-There are no language-specific header arguments for Scheme code blocks.
+The following two options are available for Scheme code blocks:
+- :host :: the host of a remotely running Scheme process.
+- :port :: the port of the remotely running Scheme process.
 
 ** Sessions
 
-- 
2.43.0