FreeCalypso > hg > freecalypso-tools
view uptools/libcoding/alpha_addr.c @ 565:4a199ff4b23f
loadtools/scripts/gta02.config: use WS=4 for consistency
with generic configs which also work on GTA02 and GTA01 targets
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Fri, 31 Jan 2020 06:18:10 +0000 |
parents | 74d5e95ee84a |
children |
line wrap: on
line source
/* * This library module contains some bits that help working with * alphabetic addresses. */ #include <sys/types.h> u_char alpha_septets_to_digits[12] = {0, 2, 4, 6, 7, 9, 11, 13, 14, 16, 18, 20}; alpha_addr_valid(ndigits, sepp) unsigned ndigits, *sepp; { unsigned n; for (n = 1; n <= 11; n++) if (alpha_septets_to_digits[n] == ndigits) { *sepp = n; return(1); } return(0); }