jstrcat.gml

来自「开放源码的编译器open watcom 1.6.0版的源代码」· GML 代码 · 共 57 行

.func jstrcat _fjstrcat
#include <jstring.h>
JSTRING jstrcat( JCHAR *dst, const JCHAR *src );
.if &farfnc eq 1 .do begin
FJSTRING __far _fjstrcat( JCHAR __far *dst,
                          const JCHAR __far *src );
.do end
.ixfunc2 '&Jstring' &func
.ixfunc2 '&Jconcat' &func
.ixfunc2 '&Jstring' &ffunc
.ixfunc2 '&Jconcat' &ffunc
.funcend
.desc begin
.if &farfnc eq 0 .do begin
The &func function appends
.do end
.el .do begin
The &func and &ffunc functions append
.do end
a copy of the Kanji string pointed to by
.arg src
(including the terminating null character)
to the end of the Kanji string pointed to by
.arg dst.
The first character of
.arg src
overwrites the null character at the end of
.arg dst.
.im ffarfunc
.desc end
.return begin
The value of
.arg dst
is returned.
.return end
.see begin
.seelist jstrcat jstrncat strcat strncat
.see end
.exmp begin
#include <stdio.h>
#include <string.h>
#include <jstring.h>

void main()
  {
    JCHAR buffer[80];
.exmp break
    strcpy( buffer, "Hello " );
    jstrcat( buffer, "world" );
    printf( "%s\n", buffer );
  }
.exmp output
Hello world
.exmp end
.class WATCOM
.system