Doxygen Source Code Documentation
s_copy.c File Reference
#include "f2c.h"Go to the source code of this file.
Functions | |
| void | s_copy (register char *a, register char *b, ftnlen la, ftnlen lb) |
Function Documentation
|
||||||||||||||||||||
|
Definition at line 14 of file s_copy.c. References a. Referenced by ef1asc_(), execute_(), get_token__(), MAIN__(), pareval_(), parevec_(), parser_(), zzconv_(), and zzlabl_().
00016 {
00017 register char *aend, *bend;
00018
00019 aend = a + la;
00020
00021 if(la <= lb)
00022 #ifndef NO_OVERWRITE
00023 if (a <= b || a >= b + la)
00024 #endif
00025 while(a < aend)
00026 *a++ = *b++;
00027 #ifndef NO_OVERWRITE
00028 else
00029 for(b += la; a < aend; )
00030 *--aend = *--b;
00031 #endif
00032
00033 else {
00034 bend = b + lb;
00035 #ifndef NO_OVERWRITE
00036 if (a <= b || a >= bend)
00037 #endif
00038 while(b < bend)
00039 *a++ = *b++;
00040 #ifndef NO_OVERWRITE
00041 else {
00042 a += lb;
00043 while(b < bend)
00044 *--a = *--bend;
00045 a += lb;
00046 }
00047 #endif
00048 while(a < aend)
00049 *a++ = ' ';
00050 }
00051 }
|
