From a4a4c78d13e9eab2427b930c067278207508d60e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Sun, 8 Jun 2025 18:48:58 -0300 Subject: Remove superfluous function and argument in call --- input.lisp | 3 --- 1 file changed, 3 deletions(-) (limited to 'input.lisp') diff --git a/input.lisp b/input.lisp index 15b8e08..55a72cb 100644 --- a/input.lisp +++ b/input.lisp @@ -16,9 +16,6 @@ :data (input-data input) :cursor (+ (input-cursor input) 1))) -(defun cursor-distance (input1 input2) - (- (input-cursor input1) (input-cursor input2))) - (defun line-and-column (input) (let ((line 1) (column 1)) (dotimes (i (input-cursor input)) -- cgit v1.2.3