From c027efa931b7a248b138467f4c7415d27f02a654 Mon Sep 17 00:00:00 2001
From: Danila Fedorin <danila.fedorin@gmail.com>
Date: Thu, 23 May 2024 00:31:36 -0700
Subject: [PATCH] Stop crashing on failed Agda invocation

Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
---
 build-agda-html.rb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/build-agda-html.rb b/build-agda-html.rb
index c271988..54c37dc 100644
--- a/build-agda-html.rb
+++ b/build-agda-html.rb
@@ -32,6 +32,8 @@ files_for_paths.each do |path, files|
   files.each do |file|
     puts "Invoking 'agda' on file: #{File.join [Dir.getwd, file]}"
     `#{ARGV[0]} --local-interfaces #{file} --html --html-dir=html`
-    fail unless $? == 0
+
+    # Allow some programs to fail (e.g., IO.agda in SPA without --guardedness)
+    # fail unless $? == 0
   end
 end