Mercurial > repo
annotate ibin/forth @ 10174:03ab1a0909e2
<b_jonas> `` c=bin/scheme; >$c echo $\'#!/bin/sh\\nexec perl \\\'-ne/Scheme$/&&push@p,$p;$p=$_}{print$p[rand@p]\\\' share/mtg/allsets.txt\' && chmod -c a+x "$c"
author | HackBot |
---|---|
date | Fri, 27 Jan 2017 09:53:42 +0000 |
parents | 33a6019d8e99 |
children | b044eecae124 |
rev | line source |
---|---|
1075
33a6019d8e99
<Gregor> mkdir ibin; for i in bin/*; do if [ "`grep \'\\. lib/interp\' $i`" ]; then mv $i ibin/; fi; done; printf \'#!/bin/sh\\nCMD=`cut -d\' \' -f1 "$1"`\\nARG=`cut -d\' \' -f2- "$2"`\\nexec ibin/$CMD "$ARG"\' > bin/interp; chmod 0755 bin/interp
HackBot
parents:
diff
changeset
|
1 #!/bin/sh |
33a6019d8e99
<Gregor> mkdir ibin; for i in bin/*; do if [ "`grep \'\\. lib/interp\' $i`" ]; then mv $i ibin/; fi; done; printf \'#!/bin/sh\\nCMD=`cut -d\' \' -f1 "$1"`\\nARG=`cut -d\' \' -f2- "$2"`\\nexec ibin/$CMD "$ARG"\' > bin/interp; chmod 0755 bin/interp
HackBot
parents:
diff
changeset
|
2 . lib/interp |
33a6019d8e99
<Gregor> mkdir ibin; for i in bin/*; do if [ "`grep \'\\. lib/interp\' $i`" ]; then mv $i ibin/; fi; done; printf \'#!/bin/sh\\nCMD=`cut -d\' \' -f1 "$1"`\\nARG=`cut -d\' \' -f2- "$2"`\\nexec ibin/$CMD "$ARG"\' > bin/interp; chmod 0755 bin/interp
HackBot
parents:
diff
changeset
|
3 interp_file ./interps/gforth_quit/gforth_quit |