Прошлой ночью я искал вызов Радиационной закаленной Куайне, но не смог его найти. Оказывается, никто еще не спросил об этом! Итак, вот оно:

Ваша задача состоит в том, чтобы создать quine, непустую компьютерную программу, которая печатает свой собственный источник, не читая его. Кроме того, если вы удалите какой-либо один байт из исходной программы, новая программа должна напечатать исходный текст вашей исходной программы.

Это код-гольф, поэтому ответы оцениваются в байтах, причем меньше байтов лучше.

Gol> <> , 49 45 байт

<<H~Kla}\`q%2l}}ss2"<\
<<H~Kla}\`q%2l}}ss2"<\

Попробуйте онлайн!

Проверка!

Я сделал это в Gol> <>, а не> <>, потому что у первого есть удобный Kоператор, который копирует верхние nэлементы в стеке, что упрощает дублирование чистой копии исходного кода.

Объяснение:

Это работает, имея две копии исполняемого кода и перенаправляя на второй, если первый поврежден. Это терпит неудачу, когда \удаляется последний или средний символ новой строки, оба из которых компенсируются позже.

<<                       Redirect left 
                    <\  Switch to other source code if this line is irradiated
                   "     Push source with wrapping string literal
                ss2      Push quote
              }}         Move "< to end
          q%2l           If the length of the stack is not right
        \`               Push an extra \
       }                 Move the \ to the end
      a                  Newline
    Kl                   Duplicate the stack
   ~                     Pop the extra newline
  H                      Halt and print stack