Changeset 358 for trunk/src/rest_interface

Timestamp:

12/04/10 13:59:08 (14 years ago)

Author:

lgiessmann

Message:

TM-SPARQL: added a method called "result"=>SPARQL-Query, so invoking it produces a result of the entier query; fixed a style warning in the RESTful-itnerface

File:

• trunk/src/rest_interface/set-up-json-interface.lisp (modified) (1 diff)

trunk/src/rest_interface/set-up-json-interface.lisp ¶

@@ -429 +429 @@
                         (progn
                           (when (typep result 'd:TopicC)
-                            (delete (elephant::oid result) *type-table*)
-                            (delete (elephant::oid result) *instance-table*))
+                            (append ;;the append function is used only for suppress
+                                    ;;style warnings of unused delete return values
+                             (delete (elephant::oid result) *type-table*)
+                             (delete (elephant::oid result) *instance-table*)))
                           (format nil "")) ;operation succeeded
                         (progn