isupper.c

来自「test file nucleus source」· C语言 代码 · 共 68 行

/*************************************************************************
*
*               Copyright Mentor Graphics Corporation 2002              
*                         All Rights Reserved.                          
*                                                                       
* THIS WORK CONTAINS TRADE SECRET AND PROPRIETARY INFORMATION WHICH IS  
* THE PROPERTY OF MENTOR GRAPHICS CORPORATION OR ITS LICENSORS AND IS   
* SUBJECT TO LICENSE TERMS.                                             
*
*************************************************************************/

/*************************************************************************
* FILE NAME                                     VERSION
*
*       isupper.c                               Nucleus Common Library 1.1
*
* DESCRIPTION
*
*       This file contains the implementation of NCL_isupper.
*
* DATA STRUCTURES
*
*       None.
*
* FUNCTIONS
*
*       NCL_isupper
*
* DEPENDENCIES
*
*       ncl.h
*       ctype.h
*
************************************************************************/

#define NU_NCL_SOURCE_FILE

#include "ncl\inc\ncl.h"
#include "ncl\inc\ctype.h"

#undef NCL_isupper

/*************************************************************************
*
*   FUNCTION
*
*       NCL_isupper
*
*   DESCRIPTION
*
*       Return nonzero for an uppercase letter.
*
*   INPUTS
*
*       c                   Character in question.
*
*   OUTPUTS
*
*       int                 Returns nonzero for uppercase letters, else 0.
*
*************************************************************************/

int NCL_isupper(int c) 
{
    return c >= 'A' && c <= 'Z'; 
}