/trunk/Examples/test-suite/r/integers_runme.R

# · R · 20 lines · 15 code · 5 blank · 0 comment · 0 complexity · 0924f90da6590586a7be073317dcb459 MD5 · raw file 

    

  1. source("unittest.R")
    2. 

  2. dyn.load(paste("integers", .Platform$dynlib.ext, sep=""))
    3. 

  3. source("integers.R")
    4. 

  4. cacheMetaData(1)
    5. 

  5. 

  6. unittest(signed_char_identity(1), 1)
    7. 

  7. unittest(unsigned_char_identity(1), 1)
    8. 

  8. unittest(signed_short_identity(1), 1)
    9. 

  9. unittest(unsigned_short_identity(1), 1)
    10. 

  10. unittest(signed_int_identity(1), 1)
    11. 

  11. unittest(unsigned_int_identity(1), 1)
    12. 

  12. unittest(signed_long_identity(1), 1)
    13. 

  13. unittest(unsigned_long_identity(1), 1)
    14. 

  14. unittest(signed_long_long_identity(1), 1)
    15. 

  15. unittest(unsigned_long_long_identity(1), 1)
    16. 

  16. 

  17. q(save="no")
    18.