(defvar *map-path* "") ;; YOUR path goes here.

(load (concatenate 'string *map-path* "strings.lsp")) 
;; Todd wrote this string manipualtion code for dmg

(load (concatenate 'string *map-path* "make-lexicon.lsp"))
;; dmg lex code (compatible with C++ GenKit)

(load  (concatenate 'string *map-path* "GenKit/genkit"))
(load (concatenate 'string *map-path* "GenKit/util"))
(load (concatenate 'string *map-path* "GenKit/pseudo-unify"))
(load (concatenate 'string *map-path* "GenKit/compgen-with-freq-count"))
;;(load (concatenate 'string *map-path* "GenKit/jiscode"))
;; avoid this if you can, it screws up generation of other Asian languages.


;; dmg's special rewrites to add *integer* and *number* to be compatible
;; with C++ GENKit grammars
(load (concatenate 'string *map-path* "GenKit/genkit-special.lsp"))



;; NOTE  transfer.lsp (Transformation Kit) is not necessary for generation 
;; unless you want to transform FSs before generating.  