Helping debug concretization

ci/concretize.sh

@@ -49,6 +49,10 @@ do
       -e ${full_environment} \
       config blame | tee config-${full_environment}-${stack}.log
 
+  if [ -e ${SPACK_SYSTEM_CONFIG_PATH}/spack.lock ]; then
+    cp ${SPACK_SYSTEM_CONFIG_PATH}/spack.lock spack-${full_environment}-${stack}-old.lock
+  fi
+
   ${STACK_LOCATION}/spack/bin/spack \
       --color always \
       -e ${full_environment} \
@@ -62,3 +66,19 @@ do
 
   cp ${SPACK_SYSTEM_CONFIG_PATH}/spack.lock spack-${full_environment}-${stack}.lock
 done
+
+curl -Ls https://github.com/josephburnett/jd/releases/download/v2.1.2/jd-amd64-linux -o jd
+chmod +x jd
+
+for name in ${compilers_names}
+do
+  if [ -e spack-${full_environment}-${stack}-old.lock ]; then
+    source ci/stack_env.sh ${name}
+    ./jd -set <(jq '.concrete_specs' spack-${full_environment}-${stack}-old.lock) <(jq '.concrete_specs' spack-${full_environment}-${stack}.lock) | egrep "^[+-]" | while read -r line
+    do
+      echo -n $line | sed 's/^\([+-]\).*/\1/'
+      echo -n " "
+      echo $line | sed 's/^[+-]//' | jq -r '"\(.name)@\(.version) %\(.compiler.name)@\(.compiler.version) arch=linux-\(.arch.platform_os)-\(if .arch.target|type == "string" then .arch.target else .arch.target.name end) -- \(.hash)"'
+    done
+  fi
+done