BlackBox/_FreeBSDLinuxOpenBSD_/Lin/Mod/gen-LibW/sizeofs.c

   1 #include <sys/types.h>
   2 #include <wctype.h>
   3 #include <wchar.h>
   4 #include <stdlib.h>
   5 #include <stdio.h>
   6
   7 #define TABS "\t\t"
   8
   9 #define FALSE (0)
  10 #define TRUE (1)
  11
  12 static void D (const char *s, int sz, int set, int export)
  13 {
  14         int res;
  15
  16         res = printf("%s%s", TABS, s);
  17         if (export) {
  18                 res = printf("*");
  19         }
  20         res = printf(" = ");
  21         if (sz == 1) {
  22                 res = printf("SHORTCHAR");
  23         } else if (sz == 2) {
  24                 res = printf("SHORTINT");
  25         } else if (sz == 4) {
  26                 if (set) {
  27                         res = printf("SET");
  28                 } else {
  29                         res = printf("INTEGER");
  30                 }
  31         } else if (sz == 8) {
  32                 if (set) {
  33                         res = printf("ARRAY [untagged] 2 OF SET");
  34                 } else {
  35                         res = printf("LONGINT");
  36                 }
  37         } else {
  38                 res = printf("ARRAY [untagged] ");
  39                 if (sz % 4 == 0) {
  40                         if (set) {
  41                                 res = printf("%d OF SET", sz / 4);
  42                         } else {
  43                                 res = printf("%d OF INTEGER", sz / 4);
  44                         }
  45                 } else {
  46                         res = printf("%d OF SHORTCHAR", sz);
  47                 }
  48         }
  49         res = printf(";\n");
  50 }
  51
  52 int main ()
  53 {\
  54         D("int", sizeof(int), FALSE, TRUE);
  55         D("wchar_t", sizeof(wchar_t), FALSE, TRUE);
  56         D("wint_t", sizeof(wint_t), FALSE, TRUE);
  57         D("size_t", sizeof(size_t), FALSE, TRUE);
  58         D("mbstate_t", sizeof(mbstate_t), FALSE, TRUE);
  59
  60         return 0;
  61 }