Ensure that installed systems can be required

melusina-org · Sep 16, 2023 · 5a24308 · 5a24308
1 parent cf4a691
commit 5a24308
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 5 deletions.
diff --git a/.github/workflows/continuous-integration.yaml b/.github/workflows/continuous-integration.yaml
@@ -30,11 +30,17 @@ jobs:
           additional-systems: >-
             alexandria
             org.melusina.confidence
-      - name: 'Validate installed implementation'
+      - name: 'Ensure that QuickLisp Home exists'
         run: |
           test -d '${{ steps.quicklisp.outputs.quicklisp-home }}'
+      - name: 'Ensure that QuickLisp Local Projects exists'
+        run: |
           test -d '${{ steps.quicklisp.outputs.quicklisp-local-projects }}'
-
+      - name: 'Ensure that installed systems can be required'
+        run: >-
+          ${{ github.action_path }}/with_lisp_implementation ${{ inputs.implementation }}
+          '(progn (require "alexandria") (require "org.melusina.confidence"))'
+      
   install-quicklisp-on-tier-2-platforms:
     needs: install-quicklisp-on-tier-1-platforms
     strategy:
@@ -60,8 +66,16 @@ jobs:
           additional-systems: >-
             alexandria
             org.melusina.confidence
-      - name: 'Validate installed implementation'
+      - name: 'Ensure that QuickLisp Home exists'
         continue-on-error: true
         run: |
           test -d '${{ steps.quicklisp.outputs.quicklisp-home }}'
+      - name: 'Ensure that QuickLisp Local Projects exists'
+        continue-on-error: true
+        run: |
           test -d '${{ steps.quicklisp.outputs.quicklisp-local-projects }}'
+      - name: 'Ensure that installed systems can be required'
+        continue-on-error: true
+        run: >-
+          ${{ github.action_path }}/with_lisp_implementation ${{ inputs.implementation }}
+          '(progn (require "alexandria") (require "org.melusina.confidence"))'
diff --git a/with_lisp_implementation b/with_lisp_implementation
@@ -52,8 +52,6 @@ lisp_load_file()
 	cat > "${script}"
 	set -- "${script}"
     fi
-
-
 
     case "${lisp_implementation}" in
 	abcl|ecl|sbcl)