[0028] 修复 bin/gf repl 中 liii base64 无法使用的问题 (#759)

Author: da-liii

devel/0028.md

@@ -0,0 +1,46 @@
+# [0028] 修复 bin/gf repl 中 liii base64 无法使用的问题
+
+## 相关文档
+- [dddd.md](dddd.md) - 任务文档模板
+
+## 任务相关的代码文件
+- src/goldfish.hpp
+- goldfish/liii/base64.scm
+
+## 如何测试
+
+### 确定性测试（单元测试）
+```
+xmake b goldfish
+bin/gf tests/liii/base64-test.scm
+```
+
+### 非确定性测试（文档验证）
+```
+bin/gf repl
+(import (liii base64))
+(base64-encode "test")
+(base64-decode "R29sZGZpc2g=")
+```
+
+## 如何提交
+
+提交前执行以下最少步骤：
+
+```bash
+bin/gf test --changed-since=main
+```
+
+## 2026/05/05 修复 bin/gf repl 中 liii base64 无法使用的问题
+### What
+修复 `bin/gf repl` 中导入 `(liii base64)` 后，base64 相关函数无法使用的问题。
+
+1. 在 `src/goldfish.hpp` 的 `mode liii` 启动逻辑中，新增 `(scheme base)` 的自动导入
+2. 同步更新 repl 启动时的提示信息，将 `(scheme base)` 列入 additionally imports
+3. 在 `goldfish/liii/base64.scm` 中显式导入 `(scheme base)` 和 `(liii error)`
+
+### Why
+在 `bin/gf -e` 模式下 `(import (liii base64))` 可以正常工作，但在 `bin/gf repl` 中会出现 `unbound variable string->utf8` 等错误。根本原因是 `mode liii` 只自动导入了 `(liii base) (liii error) (liii string)`，没有导入 `(scheme base)`。在 repl 的严格库编译环境下，`define-library` 内部无法解析来自 `(scheme base)` 的符号（如 `string->utf8`、`utf8->string`、`char->integer` 等），导致库加载失败。
+
+### How
+通过修改 `src/goldfish.hpp` 第 4250 行，在 `mode liii` 和 `mode default` 的初始化导入列表中加入 `(scheme base)`，确保 repl 环境下所有库都能访问基础函数。同时保留 `goldfish/liii/base64.scm` 中的显式导入声明，使库的依赖关系自包含。

goldfish/liii/base64.scm

@@ -1,5 +1,5 @@
 (define-library (liii base64)
-  (import (liii base) (liii bitwise))
+  (import (scheme base) (liii base) (liii bitwise) (liii error))
   (export string-base64-encode
     bytevector-base64-encode
     base64-encode

src/goldfish.hpp

@@ -4247,7 +4247,7 @@ customize_goldfish_by_mode (s7_scheme* sc, string mode, const char* boot_file_pa
   }
 
   if (mode == "default" || mode == "liii") {
-    s7_eval_c_string (sc, "(import (liii base) (liii error) (liii string))");
+    s7_eval_c_string (sc, "(import (scheme base) (liii base) (liii error) (liii string))");
   }
   else if (mode == "scheme") {
     s7_eval_c_string (sc, "(import (liii base) (liii error))");
@@ -4696,7 +4696,7 @@ goldfish_repl (s7_scheme* sc, const string& mode) {
              GOLDFISH_VERSION, S7_VERSION, S7_DATE);
   // Display mode info; liii mode shows extra imported libraries
   if (mode == "liii" || mode == "default") {
-    ic_printf ("[b]Mode:[/] [b]%s[/] (additionally imports: (liii base) (liii error) (liii string) compared to r7rs)\n\n",
+    ic_printf ("[b]Mode:[/] [b]%s[/] (additionally imports: (scheme base) (liii base) (liii error) (liii string) compared to r7rs)\n\n",
                mode.c_str ());
   }
   else {