Skip to content

Commit

Permalink
Swap JAEN TSDB and LKB commands; add setvars.lisp
Browse files Browse the repository at this point in the history
Changes are presumably by Francis Bond, but committed by Michael Goodman.
  • Loading branch information
goodmami committed Aug 16, 2016
1 parent ce45f2e commit 29e0e06
Show file tree
Hide file tree
Showing 8 changed files with 19 additions and 7 deletions.
2 changes: 1 addition & 1 deletion lisp/jaen/gmrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,2 @@
(tsdb:tsdb :cpu :erg :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/lingo/erg/lkb/script" root))
(tsdb:tsdb :cpu :erg :file t :count count :error :exit :wait 600)
3 changes: 2 additions & 1 deletion lisp/jaen/imrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
(tsdb:tsdb :cpu :erg :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/lingo/erg/lkb/script" root))
(tsdb:tsdb :cpu :erg :file t :count count :error :exit :wait 600)

3 changes: 2 additions & 1 deletion lisp/jaen/omrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
(tsdb:tsdb :cpu :erg+tnt :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/lingo/erg/lkb/script" root))
(tsdb:tsdb :cpu :erg+tnt :file t :count count :error :exit :wait 600)

2 changes: 1 addition & 1 deletion lisp/jaen/pmrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,2 @@
(tsdb:tsdb :cpu :jaen :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/uio/jaen/lkb/script" root))
(lkb::read-script-file-aux (format nil "~a/uio/tm/jaen/lkb/script" root))
3 changes: 2 additions & 1 deletion lisp/jaen/smrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
(tsdb:tsdb :cpu :jacy@pet :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/dfki/jacy/lkb/script" root))
(tsdb:tsdb :cpu :jacy@pet :file t :count count :error :exit :wait 600)

3 changes: 2 additions & 1 deletion lisp/jaen/tmrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
(tsdb:tsdb :cpu :jaen :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/uio/jaen/lkb/script" root))
(tsdb:tsdb :cpu :jaen :file t :count count :error :exit :wait 600)

3 changes: 2 additions & 1 deletion lisp/jaen/vmrs.lisp
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
(tsdb:tsdb :cpu :jacy :file t :count count :error :exit :wait 600)
(lkb::read-script-file-aux (format nil "~a/dfki/jacy/lkb/script" root))
(tsdb:tsdb :cpu :jacy :file t :count count :error :exit :wait 600)

7 changes: 7 additions & 0 deletions lisp/setvars.lisp
Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
(setf tsdb::*tsdb-maximal-number-of-analyses* limit)
(setf tsdb::*tsdb-maximal-number-of-results* limit)
(set (intern "*MAXIMUM-NUMBER-OF-EDGES*" :lkb) edges)
(set (intern "*UNPACK-EDGE-ALLOWANCE*" :lkb) edges)
(set (intern "*TSDB-MAXIMAL-NUMBER-OF-EDGES*" :tsdb) edges)
(setf mt::*transfer-edge-limit* tedges)
(setf lkb::*characterize-p* t)

0 comments on commit 29e0e06

Please sign in to comment.