Click above to get retro games delivered to your door ever month!

 isupper()           Determine if a string begins in upper case
------------------------------------------------------------------------------
 Declaration
   string.hdr

 Syntax
   func logical isupper extern
   param const char cString

 Arguments
   cString is a character string.

 Return
   A logical indicating if the input string begins with an uppercase letter.

 Description
   The isupper() function returns .T. if the first character within
   cString is an uppercase letter.

   The function also respects international characters, e. g. the .
   character is considered to be a legal uppercase letter.

 Example
   #define EXAMPLE_STRING
   #include example.hdr

   proc Test_isupper
   ? isupper( "Lloyd Tabb" )             // prints .t.
   ? isupper( "lloyd tabb" )             // prints .f.
   ? isupper( "   lloyd tabb" )          // prints .f.
   ? isupper( "1234 south street" )      // prints .f.
   endproc

   proc main
   Test_isupper()
   endproc