projects
/
m17n
/
m17n-docs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
*** empty log message ***
[m17n/m17n-docs.git]
/
utils
/
dbdata.awk
1
BEGIN {
2
3
print "/***";
4
}
5
6
/".*\.(mim|flt|fst|tbl)"/ {
7
FROM=match($0, "\".*\\.(mim|flt|fst|tbl)\"") + 1;
8
LEN=RLENGTH-2;
9
FILE=substr($0, FROM, LEN);
10
DIR=FILENAME;
11
gsub("/[^/]*$", "", DIR)
12
system("sed -n '/^;;;/s/^;;; *//p' "DIR"/"FILE);
13
printf "\n";
14
}
15
16
/^;;;/ {
17
print substr($0, 5);
18
}
19
20
END {
21
print "*/";
22
}