Report versions

Author: nomennescio

Dockerfile

@@ -18,6 +18,7 @@ RUN set -ex; \
         zlib1g-dev \
         libpq-dev \
         libsnappy-dev \
+        libzstd-dev \
     ; \
     rm -rf /var/lib/apt/lists/*;
 
@@ -56,7 +57,7 @@ RUN set -ex; \
         ./extra/talks \
     ; \
 # reimage factor.image
-    ./factor -run=codewars.imager;
+    ./factor -factor-version="$FACTOR_VERSION" -testest-version="$TESTEST_VERSION" -run=codewars.imager;
 
 ENV PATH=/opt/factor:$PATH \
     FACTOR_ROOTS=/workspace

info/postbuild/postbuild.factor

@@ -1,7 +1,16 @@
 ! copyright 2024 nomennescio
-USING: accessors assocs compiler.errors io kernel namespaces prettyprint sequences sequences.extras sets source-files.errors tools.errors ;
+USING: accessors assocs compiler.errors formatting io kernel namespaces prettyprint sequences sequences.extras sets source-files.errors system tools.errors ;
 IN: postbuild
 
+: report-factor-version ( -- )
+  "## Factor version : " write vm-version print
+  vm-git-id dup "git ID <a href=\"https://github.com/factor/factor/commit/%s\">%s</a>\n" printf
+;
+
+: report-testest-version ( -- )
+  "## Testest version : " write "testest-version" get print
+;
+
 : report-missing-libraries ( -- )
   linkage-errors get values [ error>> no-such-library? ] [ error>> name>> ] filter-map members
   [ "## Missing libraries" print
@@ -10,6 +19,8 @@ IN: postbuild
 ;
 
 : run ( -- )
+  report-factor-version
+  report-testest-version
   report-missing-libraries
 ;