1.1--- a/lisp/ffi/tree-sitter/pkg.lisp	Fri Oct 04 21:11:52 2024 -0400
     1.2+++ b/lisp/ffi/tree-sitter/pkg.lisp	Fri Oct 04 21:45:59 2024 -0400
     1.3@@ -89,14 +89,5 @@
     1.4 
     1.5 (in-package :tree-sitter)
     1.6 
     1.7-(defun load-tree-sitter () 
     1.8-  (unless (member :tree-sitter *features*)
     1.9-    (sb-alien:load-shared-object (shared-object-name "tree-sitter") :dont-save t)
    1.10-    (load-tree-sitter-alien)
    1.11-    (push :tree-sitter *features*)))
    1.12-
    1.13-(defun load-tree-sitter-alien ()
    1.14-  (handler-bind ((simple-error
    1.15-                   (lambda (condition)
    1.16-                     (warn "failed to load libtree-sitter-alien.so --- make sure to follow the install instructions in lis/lib/ffi/tree-sitter/alien.c! ~a" condition))))
    1.17-    (sb-alien:load-shared-object "/usr/local/lib/libtree-sitter-alien.so" :dont-save nil)))
    1.18+(define-alien-loader "tree-sitter" t)
    1.19+(define-alien-loader "tree-sitter-alien" t)