diff --git a/backends/nxgl/context.lisp b/backends/nxgl/context.lisp
index ef2946ea6..543e0f3a1 100644
--- a/backends/nxgl/context.lisp
+++ b/backends/nxgl/context.lisp
@@ -182,6 +182,9 @@
       (unwind-protect (finalize main)
         (nxgl:shutdown)))))
 
+(defmethod version ((_ (eql :binary)))
+  "?")
+
 (defun system-username ()
   (nxgl:username))
 
diff --git a/main.lisp b/main.lisp
index 888f450b3..277202515 100644
--- a/main.lisp
+++ b/main.lisp
@@ -128,7 +128,7 @@
   (standalone-logging-handler)
   (v:output-here)
   (v:info :trial.main "GENESIS")
-  (v:info :trail.main "Launching version ~a" (version :app))
+  (v:info :trail.main "Launching version ~a (~a)" (version :app) (version :binary))
   (when (string= "true" (uiop:getenv "TRIAL_QUIT_AFTER_INIT"))
     (let ((context (getf initargs :context)))
       (setf (getf initargs :context) (list* :visible NIL context))))
diff --git a/toolkit.lisp b/toolkit.lisp
index 183127948..33b9b5b4d 100644
--- a/toolkit.lisp
+++ b/toolkit.lisp
@@ -47,6 +47,11 @@
             (asdf:component-version (asdf:find-system +app-system+))
             (when commit (subseq commit 0 7)))))
 
+(defmethod version ((_ (eql :binary)))
+  (with-output-to-string (out)
+    (loop for o across (sha3:sha3-digest-file (first (uiop:raw-command-line-arguments)) :output-bit-length 224)
+          do (format out "~2,'0X" o))))
+
 (let ((cache NIL))
   (defun data-root (&optional (app +app-system+))
     (if (deploy:deployed-p)
diff --git a/trial.asd b/trial.asd
index ac6cdd219..c9b35f989 100644
--- a/trial.asd
+++ b/trial.asd
@@ -199,6 +199,7 @@
                :quickhull
                :convex-covering
                :machine-state/opengl
+               :sha3
                (:feature :windows :com-on)))
 
 #+sbcl