From 3d754f07fe45ed3f8b438d04f5eb3a10c55096a1 Mon Sep 17 00:00:00 2001 From: Irene Knapp Date: Mon, 4 May 2026 04:41:17 -0700 Subject: make it slightly more readable lol Force-Push: yes Change-Id: I19a63a15b0058393719c0903bcabbb9b1389e2a1 --- quine.e | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/quine.e b/quine.e index a58b2f3..ee2c653 100644 --- a/quine.e +++ b/quine.e @@ -1 +1 @@ -: go 0x0a 0x2022 value@ dup 8 + s" : go 0x0a 0x2022 value@ dup 8 + s" s" s" s" dup { dup } { 1- dup 2 + pick dup { 2 pick + pick emitstring } { drop over { dup } { 1- dup 3 + pick . space } while drop over . space } if-else } while ; go bye" 4 6 4 6 3 6 3 6 3 6 2 6 0 2 5 15 dup { dup } { 1- dup 2 + pick dup { 2 pick + pick emitstring } { drop over { dup } { 1- dup 3 + pick . space } while drop over . space } if-else } while ; go bye +: go 0x0a 0x2022 value@ dup 8 + s" : go 0x0a 0x2022 value@ dup 8 + s" s" s" s" dup { dup } { 1- dup 2 + pick dup { 2 pick + 1+ pick emitstring } { drop over { dup } { 1- dup 3 + pick . space } while drop over . space } if-else } while ; go bye" 3 5 3 5 2 5 2 5 2 5 1 5 0 1 4 15 dup { dup } { 1- dup 2 + pick dup { 2 pick + 1+ pick emitstring } { drop over { dup } { 1- dup 3 + pick . space } while drop over . space } if-else } while ; go bye -- cgit 1.4.1