Author: lgiessmann Date: Wed Nov 10 03:32:07 2010 New Revision: 336 Log: added the fundamental module-structure including all files for the TM-SPARQL-interface and the corresponding unit-tests Added: trunk/src/TM-SPARQL/ trunk/src/TM-SPARQL/sparql.lisp trunk/src/TM-SPARQL/sparql_tokenizer.lisp trunk/src/unit_tests/sparql_test.lisp trunk/src/unit_tests/trivial_queries_test.lisp Modified: trunk/src/isidorus.asd Added: trunk/src/TM-SPARQL/sparql.lisp ============================================================================== --- (empty file) +++ trunk/src/TM-SPARQL/sparql.lisp Wed Nov 10 03:32:07 2010 @@ -0,0 +1,10 @@ +;;+----------------------------------------------------------------------------- +;;+ Isidorus +;;+ (c) 2008-2010 Marc Kuester, Christoph Ludwig, Lukas Georgieff +;;+ +;;+ Isidorus is freely distributable under the LLGPL license. +;;+ You can find a detailed description in trunk/docs/LLGPL-LICENSE.txt and +;;+ trunk/docs/LGPL-LICENSE.txt. +;;+----------------------------------------------------------------------------- + +(in-package :TM-SPARQL) Added: trunk/src/TM-SPARQL/sparql_tokenizer.lisp ============================================================================== --- (empty file) +++ trunk/src/TM-SPARQL/sparql_tokenizer.lisp Wed Nov 10 03:32:07 2010 @@ -0,0 +1,14 @@ +;;+----------------------------------------------------------------------------- +;;+ Isidorus +;;+ (c) 2008-2010 Marc Kuester, Christoph Ludwig, Lukas Georgieff +;;+ +;;+ Isidorus is freely distributable under the LLGPL license. +;;+ You can find a detailed description in trunk/docs/LLGPL-LICENSE.txt and +;;+ trunk/docs/LGPL-LICENSE.txt. +;;+----------------------------------------------------------------------------- + +(defpackage :TM-SPARQL + (:use :cl :datamodel)) + + +(in-package :TM-SPARQL) Modified: trunk/src/isidorus.asd ============================================================================== --- trunk/src/isidorus.asd (original) +++ trunk/src/isidorus.asd Wed Nov 10 03:32:07 2010 @@ -40,6 +40,11 @@ (:file "model_tools" :depends-on ("exceptions"))) :depends-on ("constants")) + (:module "TM-SPARQL" + :components ((:file "sparql" + :depends-on ("sparql_tokenizer")) + (:file "sparql_tokenizer")) + :depends-on ("constants" "base-tools" "model")) (:module "xml" :components ((:module "xtm" :components ((:file "tools") @@ -161,6 +166,10 @@ :depends-on ("fixtures")) (:file "datamodel_test" :depends-on ("fixtures")) + (:file "sparql_test" + :depends-on ("fixtures")) + (:file "trivial_queries_test" + :depends-on ("fixtures")) (:file "reification_test" :depends-on ("fixtures" "unittests-constants"))) :depends-on ("atom" Added: trunk/src/unit_tests/sparql_test.lisp ============================================================================== --- (empty file) +++ trunk/src/unit_tests/sparql_test.lisp Wed Nov 10 03:32:07 2010 @@ -0,0 +1,28 @@ +;;+----------------------------------------------------------------------------- +;;+ Isidorus +;;+ (c) 2008-2010 Marc Kuester, Christoph Ludwig, Lukas Georgieff +;;+ +;;+ Isidorus is freely distributable under the LLGPL license. +;;+ You can find a detailed description in trunk/docs/LLGPL-LICENSE.txt and +;;+ trunk/docs/LGPL-LICENSE.txt. +;;+----------------------------------------------------------------------------- + +(defpackage :sparql-test + (:use :cl + :it.bese.FiveAM + :TM-SPARQL) + (:export :run-sparql-tests + :sparql-tests)) + + +(in-package :sparql-test) + + +(def-suite sparql-test + :description "tests various key functions of the TM-SPARQL module") + +(in-suite sparql-test) + + +(defun run-sparql-tests () + (it.bese.fiveam:run! 'sparql-test:sparql-tests)) \ No newline at end of file Added: trunk/src/unit_tests/trivial_queries_test.lisp ============================================================================== --- (empty file) +++ trunk/src/unit_tests/trivial_queries_test.lisp Wed Nov 10 03:32:07 2010 @@ -0,0 +1,29 @@ +;;+----------------------------------------------------------------------------- +;;+ Isidorus +;;+ (c) 2008-2010 Marc Kuester, Christoph Ludwig, Lukas Georgieff +;;+ +;;+ Isidorus is freely distributable under the LLGPL license. +;;+ You can find a detailed description in trunk/docs/LLGPL-LICENSE.txt and +;;+ trunk/docs/LGPL-LICENSE.txt. +;;+----------------------------------------------------------------------------- + +(defpackage :trivial-queries-test + (:use :cl + :it.bese.FiveAM + :datamodel) + (:export :run-trivial-queries-tests + :trivial-queries-tests)) + + +(in-package :trivial-queries-test) + + +(def-suite trivial-queries-test + :description "tests various key functions of the trivial-query-test of + the datamodel module") + +(in-suite trivial-queries-test) + + +(defun run-trivial-queries-tests () + (it.bese.fiveam:run! 'trivial-queries-test:trivial-queries-tests)) \ No newline at end of file