<commit_before>;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
(in-package :cl-user)

(defpackage "CLIM-LISTENER"
  (:use "CLIM" "CLIM-LISP")
  (:export #:run-listener #:dev-commands))

(in-package :clim-listener)

(eval-when (:load-toplevel)
;  (format t "~&~%!@#%^!@#!@ ... ~A~%~%" *load-truename*)
  (defparameter *icon-path* (merge-pathnames #P"icons/" *load-truename*)))<commit_msg>Patch from <NAME> to make the Listener compile when fasl directory != source directory.<commit_after>;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
(in-package :cl-user)

(defpackage "CLIM-LISTENER"
  (:use "CLIM" "CLIM-LISP")
  (:export #:run-listener #:dev-commands))

(in-package :clim-listener)

(eval-when (:load-toplevel)
;  (format t "~&~%!@#%^!@#!@ ... ~A~%~%" *load-truename*)
  (defparameter *icon-path* (merge-pathnames
                             #P"icons/"
                             (load-time-value (or #.*compile-file-pathname* *load-pathname*)))))
{'fraction_non_alphanumeric': 0.226321036889332, 'fraction_numerical': 0.003988035892323031, 'mean_word_length': 3.5429864253393664, 'pattern_counts': {'":': 0, '<': 4, '<?xml version=': 0, '>': 4, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5364316', 'n_tokens_mistral': 410, 'n_tokens_neox': 389, 'n_words': 78}