Changeset 454 for trunk/src/unit_tests
- Timestamp:
- 05/05/11 20:01:47 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified trunk/src/unit_tests/jtm_test.lisp ¶
r453 r454 561 561 (jtm-str-2 (export-construct-as-jtm-string 562 562 var-2 :jtm-format :1.0 :parent-p nil :revision 0))) 563 564 563 (is (string= jtm-1 565 564 (concat "{\"item_identifiers\":null,\"datatype\":" (json:encode-json-to-string *xml-string*) ",\"value\":\"var-1\",\"scope\":[\"si:http:\\/\\/some.where\\/psi-1\"],\"reifier\":null}"))) … … 1301 1300 1302 1301 1302 1303 ;TODO: *get-item 1304 ; *import-identifier-from-jtm-string 1305 ; *import-identifiers-from-jtm-strings 1306 ; *import-variant-from-jtm-list 1307 ; *import-variants-from-jtm-lists 1308 ; *import-occurrence-from-jtm-list 1309 ; *import-occurrences-from-jtm-lists 1310 ; *import-name-from-jtm-list 1311 ; *import-names-from-jtm-lists 1312 1313 1303 1314 (defun run-jtm-tests() 1304 1315 "Runs all tests of this test-suite."
Note: See TracChangeset
for help on using the changeset viewer.