Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

32 lines
597 B

  1. /^@@/ {
  2. fname = $2
  3. }
  4. /^@MAC/ {
  5. print "// Mac Note" $2 " " $3 " " $4 " " $5
  6. }
  7. /^typedef/ {
  8. n = split($0, decl, "(")
  9. n = split(decl[1], rets, "typedef ")
  10. n = split(decl[3], arglist, ")")
  11. n = split(arglist[1], the_args, ",")
  12. argstr = "( "
  13. # actuals = "( "
  14. for (i = 1; i <= n; i++)
  15. {
  16. argstr = argstr the_args[i]
  17. # actuals = actuals " arg" i
  18. if (i != n)
  19. {
  20. argstr = argstr ", "
  21. # actuals = actuals ", "
  22. }
  23. }
  24. argstr = argstr " )"
  25. # actuals = actuals " )"
  26. print "virtual " rets[2] fname " " argstr
  27. # print "{"
  28. # print " _w32imp->" fname actuals
  29. # print "}"
  30. # print ""
  31. }