fix index bug
This commit is contained in:
parent
2e51e12f09
commit
35a24c8318
2 changed files with 15 additions and 16 deletions
3
BUGS
3
BUGS
|
@ -1,6 +1,3 @@
|
|||
index:
|
||||
SEG_NULL, SEG_ASM not in the index
|
||||
|
||||
proc.c:
|
||||
as a consequence of the implementation of proc_kill,
|
||||
any loop calling sleep should check for p->killed
|
||||
|
|
28
runoff
28
runoff
|
@ -2,6 +2,8 @@
|
|||
|
||||
echo This script takes a minute to run. Be patient. 1>&2
|
||||
|
||||
LC_CTYPE=C export LC_CTYPE
|
||||
|
||||
# pad stdin to multiple of 120 lines
|
||||
pad()
|
||||
{
|
||||
|
@ -61,6 +63,18 @@ perl -e '
|
|||
if (/^[0-9]+ struct [a-zA-Z0-9_]+;/) {
|
||||
next;
|
||||
}
|
||||
if (/^([0-9]+) #define +([A-za-z0-9_]+) +?\(.*/) {
|
||||
print "$1 $2\n"
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+) +([^ ]+)/) {
|
||||
print "$1 $2 $3\n";
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+)/) {
|
||||
print "$1 $2\n";
|
||||
}
|
||||
|
||||
if (/\(/) {
|
||||
next;
|
||||
}
|
||||
|
@ -70,18 +84,6 @@ perl -e '
|
|||
print "$1 $7\n"
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-za-z0-9_]+) +?\(.*/) {
|
||||
print "$1 $2\n"
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+) +([^ ]+)$/) {
|
||||
print "$1 $2 $3\n";
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+)/) {
|
||||
print "$1 $2\n";
|
||||
}
|
||||
|
||||
elsif(/^([0-9]+) (enum|struct|union) +([A-Za-z0-9_]+) +{/){
|
||||
print "$1 $3\n";
|
||||
}
|
||||
|
@ -130,7 +132,7 @@ awk '
|
|||
grep Pages: all.ps
|
||||
|
||||
# if we have the nice font, use it
|
||||
nicefont=~rsc/plan9/sys/lib/postscript/font/LucidaSans-Typewriter83
|
||||
nicefont=~rsc/lib/postscript/LucidaSans-Typewriter83
|
||||
if [ -f $nicefont ]
|
||||
then
|
||||
(sed 1q all.ps; cat $nicefont; sed '1d; s/Courier/LucidaSans-Typewriter83/' all.ps) >allf.ps
|
||||
|
|
Loading…
Reference in a new issue