repo.or.cz
/
sbcl.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Optimize initialize-vector with 0 values.
[sbcl.git]
/
sbcl-pwd.sh
blob
c9d13c311cdd63a1428967e6f3cf35e0b10c5bf8
1
#!/bin/false
2
# Not a shell script, but something intended to be sourced from shell scripts
3
4
# This ensures that SBCL_PWD is a path understandable to SBCL.
5
6
sbcl_pwd
() {
7
case
"
${OSTYPE:-}
"
in
8
cygwin
)
9
SBCL_PWD
=
"`cygpath -m
\"
$(pwd)
\"
`"
;;
10
msys
)
11
SBCL_PWD
=
"`pwd -W`"
;;
12
*)
13
SBCL_PWD
=
"`pwd`"
;;
14
esac
15
export
SBCL_PWD
16
}