From 9d737ee11959bc2ec7563ac004637ce04160bcd4 Mon Sep 17 00:00:00 2001
From: NanoTech
Date: Sun, 11 Dec 2016 23:28:18 -0600
Subject: Output comparison script

---
 compare.fish | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100755 compare.fish

(limited to 'compare.fish')

diff --git a/compare.fish b/compare.fish
new file mode 100755
index 0000000..154f06a
--- /dev/null
+++ b/compare.fish
@@ -0,0 +1,9 @@
+#!/usr/bin/env fish
+
+set dhall_hs_path ../dhall
+set dhall_hs $dhall_hs_path/.stack-work/install/**/bin/dhall
+set dhall_rs target/debug/dhall
+set input_file $argv[1]
+diff -u \
+    --label "dhall-hs < $input_file" (eval $dhall_hs < $input_file ^&1 | psub) \
+    --label "dhall-rs < $input_file" (eval $dhall_rs < $input_file ^&1 | psub)
-- 
cgit v1.2.3