Mercurial > repo
annotate lib/karma @ 12508:335a2a849232 draft default tip
<wib_jonas> `` f=/hackenv/bin/dateu; >$f echo $\'#!/bin/bash\\nset -e\\nif (( 1 < $# )); then echo "dateu error: too many command-line arguments. Usage: dateu datetimestring"; exit 2; fi\\nexec date -u ${1:+-d "$1"} "+%Y-%m-%d %H:%M:%S.%3N %z %Z %B %-e %A %G-W%V-%u"\'; chmod a+x "$f"
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Wed, 03 Jul 2024 18:15:24 +0100 |
parents | 9b8fbae1571a |
children |
rev | line source |
---|---|
0 | 1 #!/bin/sh |
2 count () { | |
12407
9b8fbae1571a
<oerjan> sled ../lib/karma//3s/log/log -k \'> karma\' /
HackEso <hackeso@esolangs.org>
parents:
12255
diff
changeset
|
3 hg log -k '> karma' --template '{desc}\n' | |
12255
be6572e01f4c
<oerjan> t sled lib/karma//s/egrep.*>/egrep \'^<[^>]*>/
HackEso <hackeso@esolangs.org>
parents:
12254
diff
changeset
|
4 egrep '^<[^>]*> karma\'$1 | |
0 | 5 fgrep -vix "<$2> karma$1 $2" | |
6 cut -d' ' -f3 | | |
7 fgrep -cix "$2" | |
8 } | |
9 plus=$(count + "$1") | |
10 minus=$(count - "$1") | |
11 echo $(($plus-$minus)) | |
12 |