René's URL Explorer Experiment

{"@context":"https://schema.org","@type":"DiscussionForumPosting","headline":"Sharing problem when `--enable-self-tail` used","articleBody":"This program does not print the same output when `--enable-self-tail` is used.\r\n\r\n```\r\n#lang racket/base \r\n\r\n(define xs\r\n  (list (list 1 2 3 4 5)\r\n        (list 5 4 3 2 1)))\r\n\r\n(let loop ([xs xs]\r\n           [f void])\r\n  (cond\r\n    [(null? xs) (f)]\r\n    [else\r\n     (define x (car xs))\r\n     (loop (cdr xs)\r\n           (λ ()\r\n             (displayln x)\r\n             (f)))]))\r\n```\r\n\r\nWhen the flag **is not** used (or when running the code in Racket) the output is:\r\n```\r\n(5 4 3 2 1)\r\n(1 2 3 4 5)\r\n```\r\n\r\nWhen the flag **is** used the output is:\r\n```\r\n(5 4 3 2 1)\r\n(5 4 3 2 1)\r\n```","author":{"url":"https://github.com/samdphillips","@type":"Person","name":"samdphillips"},"datePublished":"2024-09-27T23:59:33.000Z","interactionStatistic":{"@type":"InteractionCounter","interactionType":"https://schema.org/CommentAction","userInteractionCount":0},"url":"https://github.com/341/racketscript/issues/341"}