|
|
1.1 root 1: /*
2: * Copyright (c) 1980 Regents of the University of California.
3: * All rights reserved. The Berkeley software License Agreement
4: * specifies the terms and conditions for redistribution.
5: *
6: * @(#)ef1cmc_.c 5.1 6/7/85
7: */
8:
9: /* EFL support routine to compare two character strings */
10:
11: long int ef1cmc_(a, la, b, lb)
12: int *a, *b;
13: long int *la, *lb;
14: {
15: return( s_cmp( (char *)a, (char *)b, *la, *lb) );
16: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.