/src/tools/wrappers-generator/filed_node.e
http://github.com/tybor/Liberty · Specman e · 53 lines · 31 code · 7 blank · 15 comment · 0 complexity · c6ace2acbef7bd30f1a7b52e29967f8f MD5 · raw file
- deferred class FILED_NODE
- -- A Gccxml node with "file" attribute
- inherit
- GCCXML_NODE
- insert
- SHARED_COLLECTIONS
- feature {ANY}
- file_id: UNICODE_STRING
- do
- Result := attribute_at(once U"file")
- ensure
- Result /= Void
- end
- line_row: UNICODE_STRING
- -- The line in the source code where Current is defined
- do
- Result := attribute_at(once U"line")
- ensure
- Result /= Void
- end
- c_file: C_FILE
- do
- Result := files.reference_at(file_id)
- end
- set_file (a_file: C_FILE)
- -- Make Current node as if it was defined into `a_file'
- -- Consider Current as if it wes defined in `a_file_name'.
- require
- a_file /= Void
- do
- attributes.put(a_file.id, once U"file")
- ensure
- set: c_file = a_file
- end
- end -- class FILED_NODE
- -- Copyright (C) 2008-2017: ,2009,2010 Paolo Redaelli
- -- wrappers-generator is free software: you can redistribute it and/or modify it
- -- under the terms of the GNU General Public License as publhed by the Free
- -- Software Foundation, either version 2 of the License, or (at your option)
- -- any later version.
- -- wrappers-generator is distributed in the hope that it will be useful, but
- -- WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
- -- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
- -- more details.
- -- You should have received a copy of the GNU General Public License along with
- -- th program. If not, see <http://www.gnu.org/licenses/>.