For information about the package build service, see https://pkg-build.racket-lang.org/about.html The time is now Tue, 29 Sep 2026 16:36:12 +0000 (/usr/bin/env PLTUSERHOME=/home/root//user PLT_PKG_BUILD_SERVICE=1 CI=true PLT_INFO_ALLOW_VARS=;PLT_PKG_BUILD_SERVICE PLTCOMPILEDROOTS=/home/root//zo: /usr/bin/xvfb-run --auto-servernum -n 1 /bin/sh -c cd "/home/root/"/racket && bin/racket -MCR "/home/root/"/zo: -l- raco pkg install --jobs 2 -u --auto s-glsl && bin/racket -MCR "/home/root/"/zo: -l- raco test --jobs 2 --drdr --package s-glsl) Resolved "s-glsl" via file:///home/root//catalogs/built/catalog Resolved "opengl" via file:///home/root//catalogs/built/catalog The following uninstalled packages were listed as dependencies and they were automatically installed: dependencies of s-glsl: opengl raco setup: version: 9.3 raco setup: platform: x86_64-linux-natipkg [cs] raco setup: target machine: any raco setup: cross-installation: yes raco setup: installation name: 9.3 raco setup: variants: cs raco setup: main collects: /home/root/racket/collects/ raco setup: collects paths: raco setup: /home/root/user/.local/share/racket/9.3/collects raco setup: /home/root/racket/collects/ raco setup: main pkgs: /home/root/racket/share/pkgs raco setup: pkgs paths: raco setup: /home/root/racket/share/pkgs raco setup: /home/root//user/.local/share/racket/9.3/pkgs raco setup: links files: raco setup: /home/root/racket/share/links.rktd raco setup: /home/root//user/.local/share/racket/9.3/links.rktd raco setup: compiled-file roots: raco setup: /home/root//zo raco setup: same raco setup: --- updating info-domain tables --- [16:36:14] raco setup: updating: /home/root/user/.local/share/racket/9.3/share/info-cache.rktd raco setup: --- pre-installing collections --- [16:36:14] raco setup: --- installing foreign libraries --- [16:36:14] raco setup: --- installing shared files --- [16:36:14] raco setup: --- compiling collections --- [16:36:14] raco setup: --- parallel build using 2 jobs --- [16:36:14] raco setup: 1 making: /opengl/opengl (OpenGL) raco setup: 0 making: /opengl/tests/opengl raco setup: 0 making: /s-glsl raco setup: 0 making: /s-glsl/core raco setup: 0 making: /s-glsl/core-test raco setup: 0 making: /s-glsl/lang raco setup: --- creating launchers --- [16:36:24] raco setup: --- installing man pages --- [16:36:24] raco setup: --- building documentation --- [16:36:24] raco setup: syncing: /opengl/opengl/doc/opengl raco setup: 1 running: /racket-index/scribblings/main/user/family.scrbl raco setup: 0 running: /racket-index/scribblings/main/user/local-redirect.scrbl raco setup: 1 running: /racket-index/scribblings/main/user/release.scrbl raco setup: 0 running: /racket-index/scribblings/main/user/search.scrbl raco setup: 0 running: /racket-index/scribblings/main/user/start.scrbl raco setup: 1 rendering: /racket-index/scribblings/main/user/family.scrbl raco setup: 0 rendering: /racket-index/scribblings/main/user/local-redirect.scrbl raco setup: 1 rendering: /racket-index/scribblings/main/user/release.scrbl raco setup: 0 rendering: /racket-index/scribblings/main/user/search.scrbl raco setup: 1 rendering: /racket-index/scribblings/main/user/start.scrbl raco setup: --- installing collections --- [16:36:31] raco setup: --- post-installing collections --- [16:36:31] raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/core.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/gl-error.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/glsl-interface.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/glsl-program.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/opengl-rename.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/pretty.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/program.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/rename-vector.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/rewrite.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/tool.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/transform.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/vec-math.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/core-test.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/double-test.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/edge-test.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/gl-error-test.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/glsl-interface-test.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/rename-vector-test.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/rewrite-test.rkt") double-test.rkt: racket test: #< 1 | #version 410 core 2 | layout(location = 0) in dvec3 aPos; 3 | uniform double uScale; 4 | void main() { 5 | gl_Position = vec4(float((aPos.x * uScale)), float(aPos.y), 0.0, 1.0); 6 | } s-expr source: /home/root/user/.local/share/racket/9.3/pkgs/s-glsl/core-test/double-test.rkt:24 1 | #lang racket/base 2 | ;; ============================================================ 3 | ;; double-test.rkt —— double 精度端到端冒烟测试 4 | ;; 运行：racket racket-glsl/core-test/double-test.rkt （需要显示器 + GL 4.0+） 5 | ;; 验证：dvec 顶点属性（gl-vertex-attrib-l-pointer）+ double uniform 6 | ;; （gl-uniform-1d）+ f64vector VBO 上传（gl-buffer-data）全链路。 7 | ;; 通过 = 打印 "double upload ok" 并 exit 0；失败 = 抛异常。 8 | ;; ============================================================ 9 | (require racket/gui 10 | "../core/opengl-rename.rkt" ; gl-* 命名层（含 double 函数） 11 | "../core/rewrite.rkt" ; (glsl ...) 宏 12 | "../core/rename-vector.rkt" ; dvec*/concat-dvecs/glsl-stride-bytes 13 | "../core/program.rkt") ; build-program / uniform-location 14 | 15 | ;; 一个离屏 GL 上下文（不必 show 窗口；with-gl-context 会按需创建上下文） 16 | (define cfg (new gl-config%)) 17 | (send cfg set-legacy? #f) 18 | (send cfg set-double-buffered #t) 19 | (define frame (new frame% (label "double-test"))) 20 | (define canvas (new canvas% (style '(gl no-autoclear)) (gl-config cfg) (parent frame))) 21 | 22 | ;; double 着色器：机器是 GL 4.5，double 系类型可用（顶点属性需较新 GLSL）。 23 | (define vert-src > 24 | (glsl (version 410 core) 25 | (layout (location 0) in dvec3 aPos) ; double 精度顶点属性（4.10+） 26 | (uniform double uScale) ; double 精度 uniform 27 | (define (main) void 28 | (set! gl_Position 29 | (vec4 (float (* (x aPos) uScale)) ; double×double → 显式转 float 30 | (float (y aPos)) 31 | 0.0 1.0))))) 32 | (define frag-src 33 | (glsl (version 410 core) 34 | (out vec4 FragColor) 35 | (define (main) void 36 | (set! FragColor (vec4 1.0 0.0 0.0 1.0))))) 37 | 38 | (send canvas with-gl-context 39 | (lambda () 40 | ;; ① 编译链接 double 着色器 41 | (define prog (build-program (gl-vertex-shader vert-src) 42 | (gl-fragment-shader frag-src))) 43 | ;; ② double uniform（glUniform* 操作"当前程序"，先 use-program） 44 | (use-program prog) 45 | (define loc (uniform-location prog "uScale")) 46 | (gl-uniform-1d loc 1.0) 47 | ;; ③ f64vector VBO 上传 48 | (define data (concat-dvecs (dvec3 -0.5 -0.5 0.0) 49 | (dvec3 0.5 -0.5 0.0) 50 | (dvec3 0.0 0.5 0.0))) 51 | (define vbo (u32vector-ref (gl-gen-buffers 1) 0)) 52 | (gl-bind-buffer gl-array-buffer vbo) 53 | (gl-buffer-data gl-array-buffer (gl-vector-sizeof data) data gl-static-draw) 54 | ;; ④ double 顶点属性（L-pointer：无 normalized 参数，dvec3 步长 24 字节） 55 | (define v (u32vector-ref (gl-gen-vertex-arrays 1) 0)) 56 | (gl-bind-vertex-array v) 57 | (gl-vertex-attrib-l-pointer 0 3 gl-double (glsl-stride-bytes 'dvec3) 0) 58 | (gl-enable-vertex-attrib-array 0) 59 | (gl-bind-vertex-array 0) 60 | (printf "double upload ok: program=~a uniform-loc=~a vbo=~a vao=~a\n" 61 | prog loc vbo v))) 62 | 63 | (exit 0) context...: /home/root/user/.local/share/racket/9.3/pkgs/s-glsl/core/program.rkt:76:2 /home/root/user/.local/share/racket/9.3/pkgs/s-glsl/core-test/double-test.rkt:39:2: send-arg15 body of "/home/root/user/.local/share/racket/9.3/pkgs/s-glsl/core-test/double-test.rkt" /home/root/racket/share/pkgs/compiler-lib/compiler/commands/test.rkt:98:2 body of (submod "/home/root/racket/share/pkgs/compiler-lib/compiler/commands/test.rkt" process) body of top-level non-empty stderr raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/transform-test.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/vec-math-test.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/info.rkt") raco test: 0 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/lang/reader.rkt") raco test: 1 (file "/home/root//user/.local/share/racket/9.3/pkgs/s-glsl/main.rkt") 98 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/rename-vector-test.rkt 81 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/rewrite-test.rkt 75 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/glsl-interface-test.rkt 63 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/edge-test.rkt 60 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/core-test.rkt 57 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/vec-math-test.rkt 14 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/gl-error-test.rkt 13 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/transform-test.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/core.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/gl-error.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/glsl-interface.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/glsl-program.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/opengl-rename.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/pretty.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/program.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/rename-vector.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/rewrite.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/tool.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/transform.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core/vec-math.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/info.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/lang/reader.rkt 0 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/main.rkt 1 1 /home/root//user/.local/share/racket/9.3/pkgs/s-glsl/core-test/double-test.rkt 1/462 test failures The time is now Tue, 29 Sep 2026 16:36:35 +0000