cirno/plan9port
1
0
Fork 0
mirror of https://github.com/9fans/plan9port.git synced 2025-01-12 11:10:07 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

paranoia

Browse source
This commit is contained in:
rsc 2005-01-14 05:55:09 +00:00
parent 3a9ee63519
commit 9bbe4594ef
7 changed files with 16 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
bin/Getdir
View file

@ -2,6 +2,7 @@
# Click on an acme directory window and then execute Getdir # Click on an acme directory window and then execute Getdir
. 9.rc
dir=acme/acme/$winid dir=acme/acme/$winid
fn rd { fn rd {
@ -20,7 +21,7 @@ if(! ~ $tag(1) */){
echo -n , | wr addr echo -n , | wr addr
ls -pF $tag(1) | sed 's/\*$//' | ls -pF $tag(1) | sed 's/\*$//' |
9grep -v '^''?\.|\.o$|^''?o\.' | grep -v '^''?\.|\.o$|^''?o\.' |
mc | wr data mc | wr data
echo -n '#0' | wr addr echo -n '#0' | wr addr
echo -n 'dot=addr' | wr ctl echo -n 'dot=addr' | wr ctl

1
bin/adict
View file

@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc #!/usr/local/plan9/bin/rc
. 9.rc
. $PLAN9/lib/acme.rc . $PLAN9/lib/acme.rc
fn event { fn event {

4
bin/doctype
View file

@ -2,6 +2,8 @@
# doctype: synthesize proper command line for troff # doctype: synthesize proper command line for troff
. 9.rc
troff=troff troff=troff
eqn=eqn eqn=eqn
prefer=prefer prefer=prefer
@ -24,7 +26,7 @@ ifs='
'{ '{
files=`{echo $*} files=`{echo $*}
} }
9 grep -h '\$LIST|\|reference|^\.(EQ|TS|\[|PS|IS|GS|G1|GD|PP|BM|LP|BP|PI|cstart|begin|TH...)|^\.P$' $* | grep -h '\$LIST|\|reference|^\.(EQ|TS|\[|PS|IS|GS|G1|GD|PP|BM|LP|BP|PI|cstart|begin|TH...)|^\.P$' $* |
sort -u | sort -u |
awk ' awk '
BEGIN { files = "'$files'" } BEGIN { files = "'$files'" }

3
bin/lookman
View file

@ -1,4 +1,7 @@
#!/usr/local/plan9/bin/rc #!/usr/local/plan9/bin/rc
. 9.rc
# Usage: lookman key ... # Usage: lookman key ...
# prints out the names of all manual pages containing all the given keywords # prints out the names of all manual pages containing all the given keywords
index=$PLAN9/man/lookman.index index=$PLAN9/man/lookman.index

10
bin/sig
View file

@ -2,7 +2,7 @@
# Usage: sig key ... # Usage: sig key ...
# prints out function signatures by grepping the manual # prints out function signatures by grepping the manual
. 9.rc
*=`{echo $*|tr A-Z a-z|tr -dc 'a-z0-9_ \012'} # fold case, delete funny chars *=`{echo $*|tr A-Z a-z|tr -dc 'a-z0-9_ \012'} # fold case, delete funny chars
if(~ $#* 0){ if(~ $#* 0){
echo Usage: sig function ... >[1=2] echo Usage: sig function ... >[1=2]
@ -10,11 +10,11 @@ if(~ $#* 0){
} }
for (i) { for (i) {
files=`{9 grep -il '[ ]\*?'$i'\(' $PLAN9/man/man3/*.3*} files=`{grep -il '[ ]\*?'$i'\(' $PLAN9/man/man3/*.3*}
for(j in $files) { for(j in $files) {
{echo .nr LL 20i; 9 sed -n '/^.SH SYNOPSIS/,/^.SH.*DESCR/p' $j } | {echo .nr LL 20i; 9 sed -n '/^.SH SYNOPSIS/,/^.SH.*DESCR/p' $j } |
9 nroff -man | nroff -man |
9 sed ' sed '
:a :a
/,$/ { /,$/ {
N N
@ -22,7 +22,7 @@ for (i) {
} }
ta ta
s/[ ]+/ /g' | s/[ ]+/ /g' |
9 grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /' grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /'
} }
} }

1
bin/spell
View file

@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc #!/usr/local/plan9/bin/rc
. 9.rc
spellflags=() spellflags=()
deroffargs=() deroffargs=()
fflag='' fflag=''

1
bin/src
View file

@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc #!/usr/local/plan9/bin/rc
. 9.rc
sym = 'threadmain?z sym = 'threadmain?z
p9main?z p9main?z
main?z' main?z'