<commit_before>;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
;;;; Name:          clsql-tests.asd
;;;; Purpose:       ASDF system definitionf for clsql testing package
;;;; Author:        <NAME>
;;;; Date Started:  Apr 2003
;;;;
;;;; $Id$
;;;; *************************************************************************

(in-package #:cl-user)
(defpackage #:clsql-tests-system (:use #:asdf #:cl))
(in-package #:clsql-tests-system)

(defsystem clsql-tests
  :name "clsql-tests"
  :author "<NAME> <<EMAIL>>"
  :maintainer "<NAME> <<EMAIL>>"
  :licence "Lessor Lisp General Public License"
  :description "Testing suite for CLSQL"

  :depends-on (:clsql :clsql-mysql :clsql-postgresql :clsql-postgresql-socket
		      :rt
		      #+(and allegro (not allegro-cl-trial)) :clsql-aodbc)
  :components
  ((:module tests
	    :components
	    ((:file "rt")
	     (:file "ptester")
	     (:file "package" :depends-on ("rt"))
;;	     (:file "tables" :depends-on ("package")))
	     (:file "tests" :depends-on ("package" "ptester")))
	    )))

(defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
  (or (funcall (intern (symbol-name '#:do-tests)
		       (find-package '#:regression-test)))
      (error "test-op failed")))

<commit_msg>r8156: depend on ptester<commit_after>;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
;;;; Name:          clsql-tests.asd
;;;; Purpose:       ASDF system definitionf for clsql testing package
;;;; Author:        <NAME>
;;;; Date Started:  Apr 2003
;;;;
;;;; $Id$
;;;; *************************************************************************

(in-package #:cl-user)
(defpackage #:clsql-tests-system (:use #:asdf #:cl))
(in-package #:clsql-tests-system)

(defsystem clsql-tests
  :name "clsql-tests"
  :author "<NAME> <<EMAIL>>"
  :maintainer "<NAME> <<EMAIL>>"
  :licence "Lessor Lisp General Public License"
  :description "Testing suite for CLSQL"

  :depends-on (:clsql :clsql-mysql :clsql-postgresql :clsql-postgresql-socket
		      :ptester
		      #+(and allegro (not allegro-cl-trial)) :clsql-aodbc)
  :components
  ((:module tests
	    :components
	    ((:file "package")
;;	     (:file "tables" :depends-on ("package")))
	     (:file "tests" :depends-on ("package")))
	    )))

(defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
  (or (funcall (intern (symbol-name '#:do-tests)
		       (find-package '#:regression-test)))
      (error "test-op failed")))


{'fraction_non_alphanumeric': 0.28898050974512746, 'fraction_numerical': 0.005997001499250375, 'mean_word_length': 4.035849056603774, 'pattern_counts': {'":': 0, '<': 17, '<?xml version=': 0, '>': 17, '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': '4462407', 'n_tokens_mistral': 947, 'n_tokens_neox': 851, 'n_words': 208}