XT Git

Repository browser, commits, branches, diffs, and smart HTTP Git transport inside the XT desktop.

Signed in as

guest

Signed in Read

Repositories

BearSSL
themaster • Read
elks-enhanced
themaster • Read
SSH Daemon Project
themaster • Read
Word Unperfect
themaster • Read

elks-enhanced

publicRead

Owner: themasterBranch: masterCommits: 6893Updated: 2026-04-19 00:15

Git CLI clone URL

git clone https://www.xt-emporium.com/git/elks-enhanced.git

Fullscreen desktop URL

Code Commits History Branches Bug Reports Discussions Compare Settings

elks-enhanced / libc / string / strchr.c

File editor

#include <string.h>

#ifdef BCC_ASM
  mov	bx,sp
  push	si
  mov	si,[bx+2]
  mov	bx,[bx+4]
  xor	ax,ax
  cld
in_loop:
  lodsb
  cmp	al,bl
  jz	got_it
  or	al,al
  jnz	in_loop
  pop	si
  ret
got_it:
  lea	ax,[si-1]
  pop	si
  ret
#endif

char *
strchr(const char * s, int c)
{
    for(; *s != (char)c; ++s) {
        if (*s == '\0')
            return NULL;
    }
    return (char *)s;
}

#ifdef __GNUC__
char *index(const char *s, int c) __attribute__ ((weak, alias ("strchr")));
#endif

Commit message

This repository is read-only for this account.

Repository snapshot

Current branch
master
Visibility
public
Your access
Read
Remote
Configured

File activity

View file history