Mercurial > urweb
comparison src/c/lacweb.c @ 180:c7a5c8e0a0e0
Cjrize EStrcat
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 03 Aug 2008 11:03:35 -0400 |
parents | 2232ab355f66 |
children | c0ea24dcb86f |
comparison
equal
deleted
inserted
replaced
179:3bbed533fbd2 | 180:c7a5c8e0a0e0 |
---|---|
503 lw_writec_unsafe(ctx, ';'); | 503 lw_writec_unsafe(ctx, ';'); |
504 } | 504 } |
505 } | 505 } |
506 } | 506 } |
507 } | 507 } |
508 | |
509 lw_Basis_string lw_Basis_strcat(lw_context ctx, lw_Basis_string s1, lw_Basis_string s2) { | |
510 int len = strlen(s1) + strlen(s2) + 1; | |
511 char *s; | |
512 | |
513 lw_check(ctx, len); | |
514 | |
515 s = ctx->heap_front; | |
516 | |
517 strcpy(s, s1); | |
518 strcat(s, s2); | |
519 ctx->heap_front += len; | |
520 | |
521 return s; | |
522 } |