emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Zelphir Kaltstahl <zelphirkaltstahl@posteo.de>
To: "Dr. Arne Babenhauserheide" <arne_bab@web.de>
Cc: emacs-orgmode@gnu.org
Subject: Re: Library of Babel usage of other programming languages than elisp
Date: Wed, 11 Aug 2021 10:01:06 +0000	[thread overview]
Message-ID: <973aa9df-26a2-f157-3d2e-fc2205f960ac@posteo.de> (raw)
In-Reply-To: <875ywd3l3h.fsf@web.de>

Hello Arne!

Thanks for that.

Do you happen to have an example, in which you are passing arguments to a procedure?

Regards,
Zelphir

On 8/10/21 7:49 AM, Dr. Arne Babenhauserheide wrote:
> Zelphir Kaltstahl <zelphirkaltstahl@posteo.de> writes:
>
>> I have repeatedly tried to use another programming language than elisp for
>> writing source blocks in org-mode, which I intended to use as functions inside
>> org-mode spreadsheets. So far without success.
> I’m using scheme in org-mode during export (though not it tables) and
> that works.
>
> call: https://hg.sr.ht/~arnebab/ews/browse/Hauptdokument/ews30/chargen.org.in?rev=ccc9148e78a4#L27
>
> begin_src: https://hg.sr.ht/~arnebab/ews/browse/Hauptdokument/ews30/chargen.org.in?rev=ccc9148e78a4#L137
>
> #+call: generate-char-jetzt()
>
> #+name: generate-char-jetzt
> #+begin_src scheme :exports none :results output raw :prologue "(import (srfi srfi-1)(ice-9 match)(ice-9 receive))(set! *random-state*  (random-state-from-platform))\n" :tangle chargen.scm :noweb yes :var kernantriebe=tabelle-grundantriebe :var hautfarbe=tabelle-hautfarbe :var haarfarbe=tabelle-haarfarbe :var augenfarbe=tabelle-augenfarbe :var darstellung1=tabelle-darstellung1 :var darstellung2=tabelle-darstellung2 :var kleidung_oben_maenner=tabelle-kleidung-jetzt-oben-maenner  :var kleidung_unten_maenner=tabelle-kleidung-jetzt-unten-maenner :var kleidung_oben_frauen=tabelle-kleidung-jetzt-oben-frauen  :var kleidung_unten_frauen=tabelle-kleidung-jetzt-unten-frauen :var kleidung_oben_frauen=tabelle-kleidung-jetzt-oben-frauen  :var kleidung_unten_frauen=tabelle-kleidung-jetzt-unten-frauen :var namen=tabelle-namen-fantasy-jetzt :var sex=tabelle-sexualitaet :var stichwort=tabelle-stichwort-jetztzeit
>   (let ()
>     {{{chargen-setup}}}
>     {{{chargen-generic}}}
>     {{{chargen-colors}}}
>     {{{chargen-specifics-jetzt}}}
>     {{{chargen-print-char}}}
>     (chargen-print-char)
>   )
> #+end_src
>
> #+begin_src scheme :noweb-ref chargen-specifics-jetzt
>     (define first-names 
>       (map first 
>         (map string-split-space 
>           (map third 
>             (remove (λ(x)(not (equal? geschlecht (fourth x)))) namen)))))
>     (define last-names (map (λ (x) (string-join (cdr x))) (map string-split-space (map third namen))))
>     (define names (apply append (map (λ (fi) (map (λ(la) (string-join (list fi la))) last-names)) first-names)))
>   ;; (define worte (list->d6alist (second (apply zip zweiworte))))
>
> #+end_src
>
> Best wishes,
> Arne

-- 
repositories: https://notabug.org/ZelphirKaltstahl



      reply	other threads:[~2021-08-11 10:02 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2021-08-09 12:52 Zelphir Kaltstahl
2021-08-09 13:34 ` Eric S Fraga
2021-08-09 14:25   ` Zelphir Kaltstahl
2021-08-09 15:11     ` Eric S Fraga
2021-08-09 16:03       ` Zelphir Kaltstahl
2021-08-10 13:18         ` Eric S Fraga
2021-08-09 15:23 ` Greg Minshall
2021-08-09 16:27   ` Zelphir Kaltstahl
2021-08-09 18:36     ` Greg Minshall
2021-08-10  5:49 ` Dr. Arne Babenhauserheide
2021-08-11 10:01   ` Zelphir Kaltstahl [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=973aa9df-26a2-f157-3d2e-fc2205f960ac@posteo.de \
    --to=zelphirkaltstahl@posteo.de \
    --cc=arne_bab@web.de \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).