PageRenderTime 44ms CodeModel.GetById 18ms RepoModel.GetById 1ms app.codeStats 0ms

/tags/ttn-post-libtool-1-4-3-upgrade/SWIG/Examples/perl5/constants/example.i

#
Swig | 27 lines | 12 code | 9 blank | 6 comment | 0 complexity | cb0bb1f676ff1f88c20a3f70c470ae10 MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
  1. /* File : example.i */
  2. %module example
  3. /* A few preprocessor macros */
  4. #define ICONST 42
  5. #define FCONST 2.1828
  6. #define CCONST 'x'
  7. #define CCONST2 '\n'
  8. #define SCONST "Hello World"
  9. #define SCONST2 "\"Hello World\""
  10. /* This should work just fine */
  11. #define EXPR ICONST + 3*(FCONST)
  12. /* This shouldn't do anything */
  13. #define EXTERN extern
  14. /* Neither should this (BAR isn't defined) */
  15. #define FOO (ICONST + BAR)
  16. /* The following directives also produce constants */
  17. %constant int iconst = 37;
  18. %constant double fconst = 3.14;