(Traduzido com o Google translate) Localize o arquivo OSCAR-TOOLS.LISP; vazou de fontes em "Lisp", mas o arquivo é chamado ". OSCAR-TOOLS.LISP". Como as fontes se referem a "Oscar-tools.lisp" tem que renomeá-lo. Mas não muda nada: nenhum outro arquivo. Nenhum projeto é muito limpo, em todos os casos, você terá muito trabalho para fazer algo com ele.
[pjb@kuiper :0 Desktop]$ cd ~/src/lisp/ai/ [pjb@kuiper :0 ai]$ mkdir oscar [pjb@kuiper :0 ai]$ cd oscar [pjb@kuiper :0 oscar]$ wget -m --no-directories --no-parent -A .lisp -A .LISP http://oscarhome.soc-sci.arizona.edu/ftp/OSCAR-web-page/oscar.html -o wget-oscar.log [pjb@kuiper :0 oscar]$ mv OSCAR-TOOLS.LISP Oscar-tools.lisp [pjb@kuiper :0 oscar]$ for f in *.lisp ; do mv $f ${f}~ ; tr '\015' '\012' < ${f}~ > $f ; done [pjb@kuiper :0 oscar]$ sed -e 's^(setf oscar-pathname "NEWG4:Library:Webserver:DOCUMENTS:ftp:CODE:")^(defparameter oscar-pathname "'$(pwd)'/")^' -e 's/OSCAR_3-31-acl.lisp/OSCAR_3-31.lisp/' -i OSCAR-loader.lisp [pjb@kuiper :0 oscar]$ clisp -ansi -norc -q [1]> (load "OSCAR-loader.lisp") ;; Loading file OSCAR-loader.lisp ... Loading OSCAR_3.31 ;; Loading file /home/pjb/src/lisp/ai/oscar/OSCAR_3-31.lisp ... Loading OSCAR_3.31 ;; Loading file /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp ... WARNING: DEFUN/DEFMACRO: redefining macro DEFUNCTION in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp, was defined in /home/pjb/src/lisp/ai/oscar/OSCAR-loader.lisp ;; Loaded file /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp ;; Loading file /home/pjb/src/lisp/ai/oscar/Syntax_3.lisp ... ;; Loaded file /home/pjb/src/lisp/ai/oscar/Syntax_3.lisp ;; Loading file /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp ... WARNING: DEFUN/DEFMACRO: redefining function << in /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp, was defined in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp WARNING: DEFUN/DEFMACRO: redefining function >> in /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp, was defined in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp WARNING: DEFUN/DEFMACRO: redefining function <<= in /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp, was defined in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp WARNING: DEFUN/DEFMACRO: redefining function >>= in /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp, was defined in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp WARNING: DEFUN/DEFMACRO: redefining function >< in /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp, was defined in /home/pjb/src/lisp/ai/oscar/Oscar-tools.lisp ;; Loaded file /home/pjb/src/lisp/ai/oscar/Assignment-trees_3-26.lisp *** - OPEN: File #P"/home/pjb/src/lisp/ai/oscar/Definitions History.lisp" does not exist The following restarts are available: SKIP :R1 skip (DEFUNCTION MAKE-BACKWARDS-INFERENCE # ...) RETRY :R2 retry (DEFUNCTION MAKE-BACKWARDS-INFERENCE # ...) STOP :R3 stop loading file /home/pjb/src/lisp/ai/oscar/OSCAR_3-31.lisp SKIP :R4 skip (LOAD #) RETRY :R5 retry (LOAD #) STOP :R6 stop loading file /home/pjb/src/lisp/ai/oscar/OSCAR-loader.lisp ABORT :R7 Abort main loop Break 1 [2]> (quit) [pjb@kuiper :0 oscar]$ ls ./ OSCAR_3-31.lisp Rules_3-30.lisp ../ Oscar-tools.lisp Syntax_3.lisp Agent-arguments5.lisp PC-examples_3-31.lisp oscar-graphics17.lisp Assignment-trees_3-26.lisp Perception-Causes_3-31.lisp wget-oscar.log Combined-problems.lisp Prob-compiler_3-24.lisp OSCAR-loader.lisp Reason-macros_3-31.lisp [pjb@kuiper :0 oscar]$ wget -m --no-directories --no-parent http://oscarhome.soc-sci.arizona.edu/ftp/OSCAR-web-page/CODE/ -o wget-oscar-2.log [pjb@kuiper :0 oscar]$ rm index.html* [pjb@kuiper :0 oscar]$ ls ./ PC-examples_3-31.lisp ../ Perception-Causes_3-31.lisp Agent-arguments5.lisp Planning Problems.44 Assignment-trees_3-26.lisp Prob - flat tire.44 Code for probable probabilities.zip Prob-compiler_3-24.lisp Code-for-probable-probabilities.zip Reason-macros_3-31.lisp Combined-problems.lisp Rules_3-30.lisp Non-Linear-Planner44 Syntax_3.lisp OSCAR-TOOLS.LISP oscar-graphics17.lisp OSCAR-loader.lisp oscar-graphics_4-02.lisp OSCAR_3-31.lisp wget-oscar-2.log Oscar-tools.lisp wget-oscar.log [pjb@kuiper :0 oscar]$ -- __Pascal Bourguignon__ http://www.informatimago.com/ A bad day in () is better than a good day in {}. -- You received this message because you are subscribed to the Google Groups "Lisp-br" group. To post to this group, send email to [email protected]. To unsubscribe from this group, send email to [email protected]. For more options, visit this group at http://groups.google.com/group/lisp-br?hl=en.
