source: buchla-68k/libsm/str2lc.c@ 3577fe1

Last change on this file since 3577fe1 was dade7a0, checked in by Thomas Lopatic <thomas@…>, 7 years ago

No more warnings in libsm.

  • Property mode set to 100644
File size: 435 bytes
RevLine 
[f40a309]1/*
2 ============================================================================
3 str2lc(s) -- convert string s to lower case ASCII
4 Version 2 -- 1987-06-12 -- Copyright 1987 -- D.N. Lynx Crowe
5 ============================================================================
6*/
7
[b28a12e]8#include "ram.h"
[e225e77]9
[7258c6a]10int8_t *str2lc(int8_t *s)
[f40a309]11{
[7258c6a]12 register int8_t c;
13 register int8_t *r = s;
[f40a309]14
[dade7a0]15 while ((c = *s))
16 *s++ = (int8_t)tolower(c);
[f40a309]17
18 return(r);
19}
[6262b5c]20
Note: See TracBrowser for help on using the repository browser.