Fix

raviqqe · Feb 24, 2025 · a5c6228 · a5c6228
1 parent f151917
commit a5c6228
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/cmd/decode/src/main.scm b/cmd/decode/src/main.scm
@@ -57,7 +57,7 @@
              (e (- (modulo (quotient integer 2) 2048) 1023)))
         (* m (expt 2 e))))))
 
-(define (decode-ribs data)
+(define (decode-ribs)
   (define dictionary (make-stack '()))
   (define stack (make-stack '()))
 
@@ -84,4 +84,4 @@
               (stack-pop! dictionary))
             (stack-push! stack value)))))))
 
-(define codes (decode-ribs #f))
+(define codes (decode-ribs))