Mercurial > repo

comparison lib/kps/bfpp @ 12277:37e5bb140d98 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<kspalaiologos> fetch /hackenv/lib/kps/bfpp https://hack.esolangs.org/get/lib/kps/bfpp
author HackEso <hackeso@esolangs.org>
date Tue, 31 Dec 2019 18:29:39 +0000
parents 3c04e9ef7a3a
children
comparison
equal deleted inserted replaced
12276:1eb8be58440e 12277:37e5bb140d98
1 #!/bin/bash -e 1 #!/bin/bash -e
2 2
3 set -o pipefail 3 set -o pipefail
4 4
5 { cat <<<"#define __NEWLINE__ ÿ"$'\n'"#define __ICOUNTER__ þ"$'\n'"" ; cat "$1" | sed -e "1!b" -e '/#/d' ; } | gcc -E -I. -Ilib - -o "$1.i" 5 { cat <<<"#define __NEWLINE__ ÿ"$'\n'"#define __ICOUNTER__ þ"$'\n'"" ; cat "$1" | sed -e "1!b" -e '/#/d' ; } | gcc -E -I. -Ilib - -o "$1.i"
6 perl -pe "s/\xFF/\x0A/g;" < "$1.i" | perl -pe 's/\xFE/$x++/ge;' | /bin/labels.pl | sed '/^#/ d' > "$1.p" 6 perl -pe "s/\xFF/\x0A/g;" < "$1.i" | perl -pe 's/\xFE/$x++/ge;' | /hackenv/lib/kps/labels.pl | sed '/^#/ d' > "$1.p"
7 rm -f "$1.i" 7 rm -f "$1.i"