File: update_ev_wrap

package info (click to toggle)
tarantool 2.6.0-1.4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 85,412 kB
  • sloc: ansic: 513,775; cpp: 69,493; sh: 25,650; python: 19,190; perl: 14,973; makefile: 4,178; yacc: 1,329; sql: 1,074; pascal: 620; ruby: 190; awk: 18; lisp: 7
file content (19 lines) | stat: -rwxr-xr-x 506 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
#!/bin/sh

(
   echo '#define VAR(name,decl) name'
   echo '#define EV_GENWRAP 1'
   cat ev_vars.h
) | cc -E -o - - | perl -ne '
   while (<>) {
      push @syms, $1 if /(^\w+)/;
   }
   print "/* DO NOT EDIT, automatically generated by update_ev_wrap */\n",
         "#ifndef EV_WRAP_H\n",
         "#define EV_WRAP_H\n",
         (map "#define $_ ((loop)->$_)\n", sort @syms),
         "#else\n",
         "#undef EV_WRAP_H\n",
         (map "#undef $_\n", sort @syms),
         "#endif\n";
' >ev_wrap.h