summaryrefslogtreecommitdiff
path: root/reference/C/CONTRIB/SNIP/ord_text.c
blob: 6b37721828e65a16f14334c05a74be92919ee824 (plain)
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
33
/*
**  Originally published as part of the MicroFirm Function Library
**
**  Copyright 1991, Robert B.Stout
**
**  Subset version with modifications suggested by Maynard Hogg
**  released to the public domain, 1992
**
**  Function to return ordinal text.
*/

static char *text[] = {"th", "st", "nd", "rd"};

char *ordinal_text(int number)
{
      if (((number %= 100) > 9 && number < 20) || (number %= 10) > 3)
            number = 0;
      return text[number];
}

#ifdef TEST

#include <stdio.h>

void main(void)
{
      int i;

      for (i = 0; i < 26; ++i)
            printf("%d%s\n", i, ordinal_text(i));
}

#endif /* TEST */