From 6a11bca93d6b6ac4d3e5a1b51c2b50ce0720d2a7 Mon Sep 17 00:00:00 2001 From: Irene Knapp Date: Fri, 22 May 2026 20:04:58 -0700 Subject: fix our first binary reproducibility issue (wow) with this fix, the first-generation and second-generation builds are precisely identical it was an unused codeword in the bootstrapped docol, under the label transform, which inadvertently had a value from the host address space. the fix required some creativity. Force-Push: yes Change-Id: I05b373b4231fa093454fa31891784de16d81bb18 --- log-load.e | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'log-load.e') diff --git a/log-load.e b/log-load.e index d1e4a2f..55fa25d 100644 --- a/log-load.e +++ b/log-load.e @@ -200,6 +200,18 @@ over log-load-here swap drop ! ; +~ (log address -- log address) +: log-load-self-codeword + log-load-here dup @ + ~ (log address, here, output point) + + dup 8 + pack64 + ~ (log address, here, output point) + + swap ! ; + + + ~ This is the same as ",", from dynamic.e, except that it takes the log's ~ address as a parameter rather than hardcoding it, so that it can be used in ~ situations where the normal compilation process isn't yet available. -- cgit 1.4.1