/[meta-cvs]/meta-cvs/F-156CAB88D4EEE783E8C4B4146B5094E2
ViewVC logotype

Diff of /meta-cvs/F-156CAB88D4EEE783E8C4B4146B5094E2

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by kaz, Wed Sep 11 05:01:33 2002 UTC revision 1.8 by kaz, Wed Sep 18 04:42:25 2002 UTC
# Line 21  if [ $# != 1 ] ; then Line 21  if [ $# != 1 ] ; then
21    echo    echo
22    exit 1    exit 1
23  else  else
24    TARGET=$1    TARGET="$1"
25  fi  fi
26    
27  TARGET_LIB="$TARGET"/lib/clisp/meta-cvs  function space_check ()
28  TARGET_BIN="$TARGET"/bin  {
29      if [ $# -gt 1 ] ; then
30        echo The path \""$*"\" contains whitespace
31        exit 1
32      fi
33    }
34    
35    space_check $TARGET
36    
37    TARGET_LIB=$TARGET/lib/clisp/meta-cvs
38    TARGET_BIN=$TARGET/bin
39    
40  if ! mkdir -p $TARGET_LIB ; then  if ! mkdir -p $TARGET_LIB ; then
41    echo "Unable to create $TARGET_LIB directory."    echo "Unable to create $TARGET_LIB directory."
# Line 50  fi Line 60  fi
60    
61  $LISPRUN -M $LINKSET/lispinit.mem -K full -q -i mcvs-main.lisp -x '(ext:saveinitmem "mcvs.mem" :quiet t)'  $LISPRUN -M $LINKSET/lispinit.mem -K full -q -i mcvs-main.lisp -x '(ext:saveinitmem "mcvs.mem" :quiet t)'
62    
63  if ! cp mcvs.mem "$TARGET_LIB"/lispinit.mem; then  if ! cp mcvs.mem $TARGET_LIB/lispinit.mem; then
64    echo "unable to copy to $TARGET_LIB"    echo "unable to copy to $TARGET_LIB"
65    exit 1    exit 1
66  fi  fi
67    
68  if ! cp $LINKSET/lisp.run "$TARGET_LIB"; then  if ! cp $LINKSET/lisp.run $TARGET_LIB; then
69    echo "unable to copy to $TARGET_LIB"    echo "unable to copy to $TARGET_LIB"
70    exit 1    exit 1
71  fi  fi
72    
73  if ! cat > "$TARGET_BIN/mcvs" <<END  if ! cat > $TARGET_BIN/mcvs <<END
74  #!$TARGET_LIB/lisp.run -M$TARGET_LIB/lispinit.mem  #!$TARGET_LIB/lisp.run -M$TARGET_LIB/lispinit.mem
75  (mcvs)  (mcvs)
76  END  END

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

  ViewVC Help
Powered by ViewVC 1.1.5