From 4e6aae19275dad2053adbc2ad34ab1330daf1b0f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Tue, 4 Nov 2025 17:53:41 -0300 Subject: Working decoder on byte level --- common.lisp | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 common.lisp (limited to 'common.lisp') diff --git a/common.lisp b/common.lisp new file mode 100644 index 0000000..a061ca1 --- /dev/null +++ b/common.lisp @@ -0,0 +1,9 @@ +(in-package #:lempel) + +(defparameter window-bits 12) ; Amount of bits for window. Valid range between 8 and 15 +(defparameter break-even-threshold 4) ; Minimum word length to consider for compression +(defparameter reversed-byte-order nil) + +(defstruct point + (offset 0 :type fixnum) + (size 0 :type fixnum)) -- cgit v1.2.3