(define-syntax get-so-files
  (ir-macro-transformer
   (lambda (expr inject compare)
     (let ((name (cadr expr)))
       `(string-split (capture (cd ,(eval name) ";" ls *.so)) "\n")))))