00001 /* 00002 The lestes compiler suite 00003 Copyright (C) 2002, 2003, 2004, 2005 Miroslav Tichy 00004 Copyright (C) 2002, 2003, 2004, 2005 Petr Zika 00005 Copyright (C) 2002, 2003, 2004, 2005 Vojtech Hala 00006 Copyright (C) 2002, 2003, 2004, 2005 Jiri Kosina 00007 Copyright (C) 2002, 2003, 2004, 2005 Pavel Sanda 00008 Copyright (C) 2002, 2003, 2004, 2005 Jan Zouhar 00009 Copyright (C) 2002, 2003, 2004, 2005 Rudolf Thomas 00010 00011 This program is free software; you can redistribute it and/or modify 00012 it under the terms of the GNU General Public License as published by 00013 the Free Software Foundation; version 2 of the License. 00014 00015 This program is distributed in the hope that it will be useful, 00016 but WITHOUT ANY WARRANTY; without even the implied warranty of 00017 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00018 GNU General Public License for more details. 00019 00020 See the full text of the GNU General Public License version 2, and 00021 the limitations in the file doc/LICENSE. 00022 00023 By accepting the license the licensee waives any and all claims 00024 against the copyright holder(s) related in whole or in part to the 00025 work, its use, and/or the inability to use it. 00026 00027 */ 00028 /*! \file 00029 \brief String data source. 00030 00031 Definition of string_source class representing data source reading from string. 00032 \author pt 00033 */ 00034 #include <lestes/common.hh> 00035 #include <lestes/lang/cplus/lex/string_source.hh> 00036 package(lestes); 00037 package(lang); 00038 package(cplus); 00039 package(lex); 00040 00041 using namespace ::std; 00042 00043 /*! 00044 Creates the object, initializes with string. 00045 \post offset == 0 00046 \post idx = = 0 00047 \param a_str The string with data. 00048 */ 00049 string_source::string_source(const string_type &a_str): 00050 str(a_str), 00051 idx(0) 00052 { 00053 } 00054 00055 /*! 00056 Reads next token from string. 00057 \return The next character. 00058 */ 00059 ptr<ucn_token> string_source::read(void) 00060 { 00061 ptr<ucn_token> t; 00062 00063 if (idx >= str.length()) { 00064 t = ucn_token::create(ucn_token::TOK_EOF,character::create_external(0)); 00065 } else { 00066 // note that the meaning of real types is not clear at this stage 00067 hchar c = str.at(idx); 00068 idx++; 00069 // do not interpret the encoding yet 00070 t = ucn_token::create(ucn_token::TOK_NOT_EOF,character::create_external(static_cast<unsigned char>(c))); 00071 } 00072 00073 return t; 00074 } 00075 00076 /*! 00077 Returns new instance, initializes with string. 00078 \param a_str The source string. 00079 \return The new instance. 00080 */ 00081 ptr<string_source> string_source::create(const string_type &a_str) 00082 { 00083 return new string_source(a_str); 00084 } 00085 00086 end_package(lex); 00087 end_package(cplus); 00088 end_package(lang); 00089 end_package(lestes); 00090 00091 /* vim: set ft=lestes : */
1.5.1-20070107