source: buchla-68k/libsm/str2uc.c@ 0c834c5

Last change on this file since 0c834c5 was 0580615, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Point of no return.

  • Property mode set to 100644
File size: 403 bytes
Line 
1/*
2 ============================================================================
3 str2uc(s) -- converts string s to upper case ASCII
4 Version 2 -- 1987-06-12 -- (c) Copyright 1987 -- D.N. Lynx Crowe
5 ============================================================================
6*/
7
8char *str2uc(char *s)
9{
10 register char c;
11 register char *r = s;
12
13 while (c = *s)
14 *s++ = toupper(c);
15
16 return(r);
17}
Note: See TracBrowser for help on using the repository browser.