;;;; tests/ydk.lisp (in-package :cl-deck-builder2-test) ;; blah blah blah. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; YDK Tests ;; (format t "~A" ;; (ydk-read ;; (asdf:system-relative-pathname :cl-deck-builder2 ;; #P"data/OG_bechi_21-Chaos Turbo.ydk"))) ;; (defparameter *ydk* ;; (cl-deck-builder2.models.ydk::read-ydk-as-model ;; (asdf:system-relative-pathname :cl-deck-builder2 #P"data/OG_bechi_21-Chaos Turbo.ydk"))) ;; (merge-pathnames (make-pathname :name "04178474" :type "jpg") ;; (asdf:system-relative-pathname :cl-deck-builder2 "static/public/ygoprodeck")) ;; (defparameter *passcode-list* (cl-deck-builder2.models.ydk::ydk-complete-list *ydk*))