Annotation of rpl/src/conversion.awk, revision 1.8
1.1 bertrand 1: BEGIN {
2: indicateur = 0;
3: }
4:
5: /^\/\/ BEGIN C PROTOTYPES/ {
6: indicateur = 1;
7: }
8:
9: /^\/\/ END C PROTOTYPES/ {
10: indicateur = 0;
11: }
12:
13: /^([abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_]+[ ]+)+/ {
14: if (indicateur == 1)
15: {
1.2 bertrand 16: if ($1 == "unsigned" || $1 == "signed" || $1 == "inline")
17: LIGNE = $3;
18: else
19: LIGNE = $2;
1.1 bertrand 20: LIGNE = substr(LIGNE, 1, index(LIGNE, "(") - 1);
21: while(substr(LIGNE, 1, 1) == "*")
22: LIGNE = substr(LIGNE, 2, length(LIGNE) - 1);
23: printf("#define %s librpl_%s\n", LIGNE, LIGNE);
24: }
25: }
CVSweb interface <joel.bertrand@systella.fr>