qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2024-11-10 15:22:04 +00:00
Code Issues Projects Releases Packages Wiki Activity

Add my strlen and charcount functions as quakec builtins. strlen

Browse source 
returns the total string length, and charcount returns the number of
times the given character appears.
This commit is contained in:
Adam Olsen 2001-07-13 22:58:31 +00:00
parent dcaa0b205f
commit 484f5494b8
1 changed files with 42 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

42
qw/source/sv_pr_cmds.c
View file

@ -1634,6 +1634,46 @@ PF_multicast (progs_t *pr)
SV_Multicast (o, to); SV_Multicast (o, to);
} }
/*
PF_strlen
float(string s) strlen
*/
void
PF_strlen (progs_t *pr)
{
char *s;
s = G_STRING (pr, OFS_PARM0);
G_FLOAT (pr, OFS_RETURN) = strlen(s);
}
/*
PF_charcount
float(string char, string s) charcount
*/
void
PF_charcount (progs_t *pr)
{
char *s;
char goal;
int count;
goal = (G_STRING (pr, OFS_PARM0))[0];
if (goal == '\0')
G_FLOAT (pr, OFS_RETURN) = 0;
count = 0;
s = G_STRING (pr, OFS_PARM1);
while (*s) {
if (*s == goal)
count++;
s++;
}
G_FLOAT (pr, OFS_RETURN) = count;
}
void void
PF_Fixme (progs_t *pr) PF_Fixme (progs_t *pr)
@ -1790,6 +1830,8 @@ builtin_t sv_builtins[] = {
PF_Fixme, PF_Fixme,
PF_Fixme, PF_Fixme,
PF_Checkextension, PF_Checkextension,
PF_strlen,
PF_charcount,
}; };
int sv_numbuiltins = sizeof (sv_builtins) / sizeof (sv_builtins[0]); int sv_numbuiltins = sizeof (sv_builtins) / sizeof (sv_builtins[0]);