diff options
| -rw-r--r-- | japonca.asd | 2 | ||||
| -rw-r--r-- | soru.lisp | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/japonca.asd b/japonca.asd index cc5a775..99669af 100644 --- a/japonca.asd +++ b/japonca.asd @@ -1,7 +1,7 @@ (defsystem japonca :author "Emre Akan" ;; :license "" - ;; :depends-on () + :depends-on (uiop) :description "Japonca bilgisini pekiştirmek amaçlı soru soran program" :components ((:file "paket") (:file "util") @@ -3,7 +3,9 @@ (setf *random-state* (make-random-state t)) (defparameter *kelimeler* nil) -(defparameter *kelimeler-dosyası* "/home/riton/projects/japonca/kelimeler.txt") +(defparameter *kelimeler-dosyası* + (format nil "/home/~a/projects/japonca/kelime/kelimeler.txt" + (uiop:hostname))) (defun kelimeleri-yükle (&optional (dosya *kelimeler-dosyası*)) (setf *kelimeler* |