################################################################################
#                        Copyright 2018 Ryan M. Richard                        #
#       Licensed under the Apache License, Version 2.0 (the "License");        #
#       you may not use this file except in compliance with the License.       #
#                   You may obtain a copy of the License at                    #
#                                                                              #
#                  http://www.apache.org/licenses/LICENSE-2.0                  #
#                                                                              #
#     Unless required by applicable law or agreed to in writing, software      #
#      distributed under the License is distributed on an "AS IS" BASIS,       #
#   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   #
#     See the License for the specific language governing permissions and      #
#                        limitations under the License.                        #
################################################################################

include_guard()

## Returns the first character from a string without advancing it.
#
# :param return: An identifier to which the 1st character will be assigned.
# :param str: An identifier whose value is a string
function(_cpp_string_peek _csp_return _csp_str)
    string(SUBSTRING "${${_csp_str}}" 0 1 _csp_1st_char)
    set(${_csp_return} "${_csp_1st_char}" PARENT_SCOPE)
endfunction()
