File: long_long_runme.2.d

package info (click to toggle)
swig 4.4.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 45,980 kB
  • sloc: cpp: 54,284; ansic: 29,022; java: 17,595; python: 12,734; cs: 10,421; ruby: 7,263; yacc: 6,501; makefile: 5,860; javascript: 5,538; sh: 5,422; perl: 4,246; php: 3,733; ml: 2,198; tcl: 2,015; lisp: 1,448; xml: 115
file content (32 lines) | stat: -rw-r--r-- 857 bytes parent folder | download | duplicates (13)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
// Checks if the long long and unsigned long long types work.
module long_long_runme;

import std.conv;
import std.exception;
import long_long.long_long;

void main() {
  check_ll(0L);
  check_ll(0x7FFFFFFFFFFFFFFFL);
  check_ll(-10L);

  check_ull(0u);
  check_ull(127u);
  check_ull(128u);
  check_ull(9223372036854775807u); //0x7FFFFFFFFFFFFFFFL
  check_ull(18446744073709551615u); //0xFFFFFFFFFFFFFFFFL
}

void check_ll(long value) {
  ll = value;
  long value_check = ll;
  enforce(value == value_check, "Runtime test using long long failed: expected: " ~
    to!string(value) ~ ", got: " ~ to!string(value_check));
}

void check_ull(ulong value) {
  ull = value;
  ulong value_check = ull;
  enforce(value == value_check, "Runtime test using unsigned long long failed: expected: " ~
      to!string(value) ~ ", ll_check=" ~ to!string(value_check));
}