From 732a4efd33d8a61ee1c5fde656a15d93f9c4686f Mon Sep 17 00:00:00 2001
From: mtgmonkey <mtgmonkey@nixos>
Date: Wed, 3 Dec 2025 20:16:51 +0100
Subject: [PATCH] fix pair compiler warnings

---
 src/Language/GLSL.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/Language/GLSL.hs b/src/Language/GLSL.hs
index 24338b8..adb002a 100644
--- a/src/Language/GLSL.hs
+++ b/src/Language/GLSL.hs
@@ -176,8 +176,6 @@ type CheckResult = Either CheckFailure CheckSuccess
 type CheckSuccess = (Program, [Warn])
 type CheckFailure = (Error, [Warn])
 
-type LineNumber = Int
-
 data Error
   = ErrUnimplementedCheckProgram
   | ErrVariableDeclaredMultipleTimes Variables
@@ -268,6 +266,6 @@ counts' (x:xs) cts =
         [(a, ct + 1) | (a, ct) <- cts
                      , a == x
         ] ++
-        [t | t@(a, ct) <- cts
+        [t | t@(a, _) <- cts
            , a /= x
         ]