<commit_before>;;;; turtle-geometry.asd

(asdf:defsystem #:turtle-geometry
  :description "Describe turtle-geometry here"
  :author "Name <<EMAIL>>"
  :license "Licenceless Rider"
  :depends-on (#:err)
  :serial t
  :pathname "src/"
  :components ((:file "package")
               (:file "globals")
               (:file "utils")
               (:file "turtle")
               (:file "line-drawer")
               (:file "turtle-drawer")
               (:file "turtle-geometry")
               (:file "main")))

(asdf:defsystem #:turtle-geometry.tests
  :description "Describe turtle-geometry.tests here"
  :author "Name <<EMAIL>>"
  :license "Licenceless Rider"
  :depends-on (#:err
               #:turtle-geometry
               #:simple-testing)
  :serial t
  :pathname "t/"
  :components ((:file "package")
               (:file "tests")))

(defmethod asdf:perform ((op asdf:test-op)
                         (system (eql (asdf:find-system :turtle-geometry))))
  (format t "~2&*************~@
                ** Loading **~@
                *************~%")
  (asdf:oos 'asdf:load-op :turtle-geometry.tests)
  (asdf:oos 'asdf:test-op :turtle-geometry.tests))
<commit_msg>Add new file to asdf description.<commit_after>;;;; turtle-geometry.asd

(asdf:defsystem #:turtle-geometry
  :description "Describe turtle-geometry here"
  :author "Name <<EMAIL>>"
  :license "Licenceless Rider"
  :depends-on (#:err)
  :serial t
  :pathname "src/"
  :components ((:file "package")
               (:file "globals")
               (:file "utils")
               (:file "turtle")
               (:file "line-drawer")
               (:file "turtle-drawer")
               (:file "turtle-geometry")
               (:file "shapes")
               (:file "main")))

(asdf:defsystem #:turtle-geometry.tests
  :description "Describe turtle-geometry.tests here"
  :author "Name <<EMAIL>>"
  :license "Licenceless Rider"
  :depends-on (#:err
               #:turtle-geometry
               #:simple-testing)
  :serial t
  :pathname "t/"
  :components ((:file "package")
               (:file "tests")))

(defmethod asdf:perform ((op asdf:test-op)
                         (system (eql (asdf:find-system :turtle-geometry))))
  (format t "~2&*************~@
                ** Loading **~@
                *************~%")
  (asdf:oos 'asdf:load-op :turtle-geometry.tests)
  (asdf:oos 'asdf:test-op :turtle-geometry.tests))

{'fraction_non_alphanumeric': 0.1828761429758936, 'fraction_numerical': 0.0008312551953449709, 'mean_word_length': 2.297260273972603, 'pattern_counts': {'":': 0, '<': 11, '<?xml version=': 0, '>': 11, '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': '4291309', 'n_tokens_mistral': 834, 'n_tokens_neox': 768, 'n_words': 167}