diff options
| -rw-r--r-- | blog/stem.org | 2 | ||||
| -rw-r--r-- | index.org | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/blog/stem.org b/blog/stem.org index adec880..bd530cb 100644 --- a/blog/stem.org +++ b/blog/stem.org @@ -329,7 +329,7 @@ dupt [ [ [ dup ] dip ] dip ] def which duplicates the second and third value on the stack respectively. However, we might want to define ~dupn~ for any n, which takes in an integer and computes ~dup~ ~n~ values down. We can do that with metaprogramming, or less abstractly, we can do it by repeatedly putting quotes inside quotes, and then we can ~eval~ the resultant quote. Here is the code that programs ~dipn~ in its entirety, without any sugarcoating: -#+begin_src stem +#+begin_src stem :exports both # dsc simply discards the top object on the stack dsc2 [ dsc dsc ] def dupd [ [ dup ] dip ] def @@ -63,7 +63,7 @@ website: #+begin_src shell :exports code :results silent cd ~/org/website git add . -git commit -m "add metaprogramming section" +git commit -m "exports both" git push github main rsync -azvP ~/website_html/ root@nullring.xyz:/var/www/ret2pop/ #+end_src |