aaronp-zomg 1.0.2.20080827232412

data/History.txt

@@ -0,0 +1,25 @@
+=== 1.0.3
+
+* 1 bugfix
+
+  * Generating java style getters and setters. :-(
+
+=== 1.0.2
+
+* 2 bugfixes
+
+  * Generating attribute functions that raise rather than attr_accessors
+  * Removed extra "do not modify" comments
+
+=== 1.0.1
+
+* 1 bugfix
+
+  * Prefix modules must be split
+
+=== 1.0.0 / 2008-07-22
+
+* 1 major enhancement
+
+  * Birthday!
+

data/Manifest.txt

@@ -0,0 +1,238 @@
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+bin/omfg
+lib/scanner.rex
+lib/yacc.y
+lib/zomg.rb
+lib/zomg/idl.rb
+lib/zomg/idl/lexer.rb
+lib/zomg/idl/nodes/attribute.rb
+lib/zomg/idl/nodes/binary.rb
+lib/zomg/idl/nodes/constant.rb
+lib/zomg/idl/nodes/interface.rb
+lib/zomg/idl/nodes/interface_header.rb
+lib/zomg/idl/nodes/member.rb
+lib/zomg/idl/nodes/node.rb
+lib/zomg/idl/nodes/operation.rb
+lib/zomg/idl/nodes/parameter.rb
+lib/zomg/idl/nodes/typedef.rb
+lib/zomg/idl/nodes/union.rb
+lib/zomg/idl/parser.rb
+lib/zomg/idl/scanner.rb
+lib/zomg/idl/visitable.rb
+lib/zomg/idl/visitors/duhr.rb
+lib/zomg/idl/visitors/ruby_sexp.rb
+lib/zomg/idl/visitors/sexp.rb
+lib/zomg/version.rb
+test/assets/array/array1.idl
+test/assets/array/array2.idl
+test/assets/array/array3.idl
+test/assets/array/array4.idl
+test/assets/array/array5.idl
+test/assets/attribute/grid_0attribs_2methods.idl
+test/assets/attribute/grid_1ROattribs_1attribs_0methods.idl
+test/assets/attribute/grid_1ROattribs_1attribs_1methods.idl
+test/assets/attribute/grid_1ROattribs_1attribs_2methods.idl
+test/assets/attribute/grid_1ROattribs_1methods.idl
+test/assets/attribute/grid_1ROattribs_2methods.idl
+test/assets/attribute/grid_1attribs_1methods.idl
+test/assets/attribute/grid_1attribs_2methods.idl
+test/assets/attribute/grid_2ROattribs_0methods.idl
+test/assets/attribute/grid_2ROattribs_1methods.idl
+test/assets/attribute/grid_2ROattribs_2methods.idl
+test/assets/attribute/grid_2attribs_0methods.idl
+test/assets/attribute/grid_2attribs_1methods.idl
+test/assets/attribute/grid_2attribs_2methods.idl
+test/assets/comment/c_style_comments.idl
+test/assets/comment/comment1.idl
+test/assets/comment/cpp_style_comments.idl
+test/assets/comment/shortform.idl
+test/assets/complex/TestCodeSets.idl
+test/assets/complex/TestIntfContext.idl
+test/assets/complex/TestIntfLongLong.idl
+test/assets/complex/TestIntfWChar.idl
+test/assets/complex/any1.idl
+test/assets/complex/complex1.idl
+test/assets/complex/complex2.idl
+test/assets/complex/complex3.idl
+test/assets/complex/complex4.idl
+test/assets/complex/interop_wchar.idl
+test/assets/constant/constant1.idl
+test/assets/constant/constant2.idl
+test/assets/constant/constant3.idl
+test/assets/constant/constant4.idl
+test/assets/constant/constant5.idl
+test/assets/constant/constant6.idl
+test/assets/constant/constant7.idl
+test/assets/enum/enum1.idl
+test/assets/exception/TestIntfExceptions.idl
+test/assets/exception/TestIntfExceptionsExt_2_0.idl
+test/assets/exception/TestIntfExceptionsExt_2_3.idl
+test/assets/exception/ex1.idl
+test/assets/exception/ex2.idl
+test/assets/exception/ex3.idl
+test/assets/exception/ex4.idl
+test/assets/exception/sc.idl
+test/assets/exception/simple1.idl
+test/assets/exception/simple2.idl
+test/assets/factory/factory1.idl
+test/assets/factory/objref.idl
+test/assets/forward/forward.idl
+test/assets/forward/forward1.idl
+test/assets/forward/fwd_incl1.idl
+test/assets/forward/fwd_incl2.idl
+test/assets/include/a.idl
+test/assets/include/b.idl
+test/assets/include/employee.idl
+test/assets/include/include1.idl
+test/assets/include/include2.idl
+test/assets/include/manager.idl
+test/assets/include/pragma.idl
+test/assets/include/rookie.idl
+test/assets/include/rookiemanager.idl
+test/assets/include/sample.idl
+test/assets/include/sample_incl.idl
+test/assets/inherit/IDL1.idl
+test/assets/inherit/IDL2.idl
+test/assets/inherit/IDL3.idl
+test/assets/inherit/IDL4.idl
+test/assets/inherit/diamond_inheritance.idl
+test/assets/inherit/inherit.idl
+test/assets/limit/longidentifiers.idl
+test/assets/limit/namelens.idl
+test/assets/limit/tpztest.idl
+test/assets/module/module1.idl
+test/assets/module/module2.idl
+test/assets/module/module3.idl
+test/assets/module/module4.idl
+test/assets/nested/nested1.idl
+test/assets/nested/nested2.idl
+test/assets/operations/Benchmark.idl
+test/assets/operations/CCS.idl
+test/assets/operations/TestIntf.idl
+test/assets/operations/TestIntfBasic.idl
+test/assets/operations/atomic.idl
+test/assets/operations/dif2.idl
+test/assets/operations/interface1.idl
+test/assets/operations/parameters.idl
+test/assets/operations/perf.idl
+test/assets/operations/timer.idl
+test/assets/preprocess/base_for_diamond_inheritance_with_macros.idl
+test/assets/preprocess/basic_macro_marshalling.idl
+test/assets/preprocess/diamond_inheritance_with_macros.idl
+test/assets/preprocess/macro1.idl
+test/assets/preprocess/preprocess1.idl
+test/assets/preprocess/preprocess2.idl
+test/assets/recursion/loop.idl
+test/assets/recursion/recursion1.idl
+test/assets/recursion/recursion2.idl
+test/assets/scenarios/filestat.idl
+test/assets/scenarios/gateway.idl
+test/assets/scenarios/library.idl
+test/assets/scenarios/phone.idl
+test/assets/scenarios/ticketservice.idl
+test/assets/scope/scope01.idl
+test/assets/scope/scope02.idl
+test/assets/scope/scope03.idl
+test/assets/scope/scope04.idl
+test/assets/scope/scope05.idl
+test/assets/scope/scope06.idl
+test/assets/scope/scope07.idl
+test/assets/scope/scope08.idl
+test/assets/scope/scope09.idl
+test/assets/scope/scope10.idl
+test/assets/scope/scope11.idl
+test/assets/scope/scope12.idl
+test/assets/scope/scope13.idl
+test/assets/scope/scope14.idl
+test/assets/scope/scope15.idl
+test/assets/scope/scope16.idl
+test/assets/scope/scope17.idl
+test/assets/scope/scope18.idl
+test/assets/scope/scope19.idl
+test/assets/scope/scope20.idl
+test/assets/scope/scope21.idl
+test/assets/scope/scope22.idl
+test/assets/scope/scope23.idl
+test/assets/scope/scope24.idl
+test/assets/scope/scope25.idl
+test/assets/scope/scope26.idl
+test/assets/scope/scope27.idl
+test/assets/scope/scope28.idl
+test/assets/scope/scope29.idl
+test/assets/scope/scope30.idl
+test/assets/scope/scope31.idl
+test/assets/scope/scope32.idl
+test/assets/scope/scope33.idl
+test/assets/scope/scope34.idl
+test/assets/scope/scope35.idl
+test/assets/scope/scope36.idl
+test/assets/scope/scope37.idl
+test/assets/scope/scope38.idl
+test/assets/scope/scope39.idl
+test/assets/scope/scope40.idl
+test/assets/scope/scope41.idl
+test/assets/scope/scope42.idl
+test/assets/scope/scope43.idl
+test/assets/scope/scope44.idl
+test/assets/sequence/sequence1.idl
+test/assets/sequence/sequence2.idl
+test/assets/simple/basictypes1.idl
+test/assets/simple/basictypes2.idl
+test/assets/simple/basictypes3.idl
+test/assets/simple/basictypes4.idl
+test/assets/simple/basictypes5.idl
+test/assets/simple/basictypes6.idl
+test/assets/simple/simple1.idl
+test/assets/simple/simple2.idl
+test/assets/simple/simple3.idl
+test/assets/string/string1.idl
+test/assets/string/string2.idl
+test/assets/struct/struct1.idl
+test/assets/struct/struct2.idl
+test/assets/struct/struct3.idl
+test/assets/struct/struct4.idl
+test/assets/struct/struct5.idl
+test/assets/typecode/orb.idl
+test/assets/typecode/pseudo.idl
+test/assets/typedef/shorthand_typedef_struct_insideIF.idl
+test/assets/typedef/shorthand_typedef_struct_insideIF_noMO.idl
+test/assets/typedef/shorthand_typedef_struct_insideMO.idl
+test/assets/typedef/shorthand_typedef_struct_outsideMO.idl
+test/assets/typedef/typedef1.idl
+test/assets/typedef/typedef2.idl
+test/assets/typedef/typedef_struct_insideIF.idl
+test/assets/typedef/typedef_struct_insideMO.idl
+test/assets/typedef/typedef_struct_outsideMO.idl
+test/assets/union/union1.idl
+test/assets/union/union2.idl
+test/assets/union/union3.idl
+test/conversions/test_attribute.rb
+test/conversions/test_enum.rb
+test/conversions/test_exception.rb
+test/conversions/test_forward_declaration.rb
+test/conversions/test_interface.rb
+test/conversions/test_module.rb
+test/conversions/test_struct.rb
+test/conversions/test_typedef.rb
+test/conversions/test_union.rb
+test/conversions/test_value_box_dcl.rb
+test/helper.rb
+test/simple/test_basictypes1.rb
+test/simple/test_basictypes2.rb
+test/simple/test_basictypes3.rb
+test/simple/test_basictypes4.rb
+test/simple/test_basictypes5.rb
+test/simple/test_basictypes6.rb
+test/simple/test_simple1.rb
+test/simple/test_simple2.rb
+test/simple/test_simple3.rb
+test/test_array.rb
+test/test_assets.rb
+test/test_complex.rb
+test/test_node.rb
+test/test_parser.rb
+test/test_scanner.rb
+zomg.gemspec

data/README.txt

@@ -0,0 +1,59 @@
+= ZOMG
+
+* http://zomg.rubyforge.org/
+* http://tenderlovemaking.com/
+
+== DESCRIPTION:
+
+ZOMG is an OMG IDL parser.  ZOMG will generate a Ruby AST from an IDL AST,
+and will even generate ruby (by means of Ruby2Ruby).
+
+== FEATURES/PROBLEMS:
+
+* Parses IDL, generates Ruby
+* Ships with OMFG the Object Management File Generator
+* Ignores nested structs/unions
+* Treats out/inout parameters are DIY
+
+== SYNOPSIS:
+
+In code:
+
+  ZOMG::IDL.parse(File.read(ARGV[0])).to_ruby
+
+Command line:
+
+  $ omfg lol.idl > roflmao.rb
+
+== REQUIREMENTS:
+
+* ruby2ruby
+
+== INSTALL:
+
+* sudo gem install zomg
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 {Aaron Patterson}[http://tenderlovemaking.com/]
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,43 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+
+GENERATED_SCANNER = 'lib/zomg/idl/scanner.rb'
+GENERATED_LEXER = 'lib/zomg/idl/lexer.rb'
+
+$LOAD_PATH << File.expand_path(File.join(File.dirname(__FILE__), 'lib'))
+$DEBUG = ENV['DEBUG']
+require 'zomg/version'
+
+HOE = Hoe.new('zomg', ZOMG::VERSION) do |p|
+   p.developer('Aaron Patterson', 'aaronp@rubyforge.org')
+   p.clean_globs = [GENERATED_LEXER, GENERATED_SCANNER]
+   p.description = p.paragraphs_of('README.txt', 3..10).join("\n\n")
+   p.extra_deps = ['ruby2ruby']
+end
+
+file GENERATED_LEXER => 'lib/yacc.y' do |t|
+  #sh "racc #{$DEBUG ? '-g' : ''} -o #{t.name} #{t.prerequisites.first}"
+  sh "racc -g -o #{t.name} #{t.prerequisites.first}"
+end
+
+file GENERATED_SCANNER => 'lib/scanner.rex' do |t|
+  sh "frex --independent -o #{t.name} #{t.prerequisites.first}"
+end
+
+task :parser => [GENERATED_SCANNER, GENERATED_LEXER]
+
+Rake::Task[:test].prerequisites << :parser
+Rake::Task[:check_manifest].prerequisites << :parser
+
+namespace :gem do
+  task :spec do
+    File.open("#{HOE.name}.gemspec", 'w') do |f|
+      HOE.spec.version = "#{HOE.version}.#{Time.now.strftime("%Y%m%d%H%M%S")}"
+      f.write(HOE.spec.to_ruby)
+    end
+  end
+end
+
+# vim: syntax=Ruby

data/bin/omfg

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+# == Synopsis
+#
+# omfg: generate ruby code given an OMG IDL file
+#
+# == Usage
+#
+# omfg [OPTION] ... FILE
+#
+# -h, --help:
+#   show help
+#
+# -o [file]
+#   output to file [file]
+#
+# --prefix [module]
+#   module prefix the output with [module]
+
+require 'getoptlong'
+require 'rdoc/usage'
+require 'rubygems'
+require 'zomg'
+
+opts = GetoptLong.new(
+                      ['--prefix', GetoptLong::OPTIONAL_ARGUMENT],
+                      ['-o', GetoptLong::OPTIONAL_ARGUMENT],
+                      ['--help', '-h', GetoptLong::OPTIONAL_ARGUMENT]
+                     )
+
+prefix = nil
+outfile = ARGV[1]
+opts.each do |opt, arg|
+  case opt
+  when '--prefix'
+    prefix = arg
+  when '--help'
+    RDoc::usage
+  when '-o'
+    outfile = arg
+  end
+end
+
+header = <<-eoprefix
+#
+# DO NOT MODIFY!!!!
+# This file is automatically generated by zomg #{ZOMG::VERSION}
+# from IDL file "#{ARGV[0] || 'standard in'}".
+#
+eoprefix
+
+tree = ARGV[0] ?
+  ZOMG::IDL.parse(File.read(ARGV[0])) : ZOMG::IDL.parse($stdin.read)
+
+rubycode = "#{header}\n#{tree.to_ruby(prefix)}"
+outfile ? File.open(outfile, 'wb') { |f| f.write(rubycode) } : puts(rubycode)
+

data/lib/scanner.rex

@@ -0,0 +1,169 @@
+module ZOMG
+module IDL
+class Scanner
+
+/*
+ *  MICO --- a free CORBA implementation
+ *  Copyright (C) 1997-98 Kay Roemer & Arno Puder
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program 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 this program; if not, write to the Free Software
+ *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ *  Send comments and/or bug reports to:
+ *                 mico@informatik.uni-frankfurt.de
+ *
+ *  Converstion to RACC Copyright (C) 2008 Aaron Patterson
+ */
+
+macro
+  Digits            [0-9]+
+  Oct_Digit         [0-7]
+  Hex_Digit         [a-fA-F0-9]
+  Int_Literal       [1-9][0-9]*
+  Oct_Literal       0{Oct_Digit}*
+  Hex_Literal       0[xX]{Hex_Digit}*
+  Comment           \/\*(.|[\r\n])*?\*\/
+  Esc_Sequence1     \\\\\\\\\[ntvbrfa\\\\?'\\\\\\\\\"]
+  Esc_Sequence2     \\\\\\\\\{Oct_Digit}{1,3}
+  Esc_Sequence3     \\\\\\\\\[xX]{Hex_Digit}{1,2}
+  Esc_Sequence      ({Esc_Sequence1}|{Esc_Sequence2}|{Esc_Sequence3})
+  Char              ([^\n\t\"\'\\\]|{Esc_Sequence})
+  Char_Literal      '({Char}|\")'
+  String_Literal    "({Char}|')*"
+  Float_Literal1    {Digits}\.{Digits}[eE][\+-]?{Digits}
+  Float_Literal2    {Digits}\.[eE][\+-]?{Digits}
+  Float_Literal3    {Digits}[eE][\+-]?{Digits}
+  Float_Literal4    {Digits}\.{Digits}
+  Float_Literal5    {Digits}\.
+  Float_Literal6    \.{Digits}[eE][\+-]?{Digits}
+  Float_Literal7    \.{Digits}
+  Fixed_Literal1    {Digits}[dD]
+  Fixed_Literal2    {Digits}\.[dD]
+  Fixed_Literal3    \.{Digits}[dD]
+  Fixed_Literal4    {Digits}\.{Digits}[dD]
+  CORBA_Identifier  [a-zA-Z_][a-zA-Z0-9_]*
+  IDENT             [a-zA-Z0-9_]
+
+rule
+
+# [:state]  pattern  [actions]
+            [\s\n\r]
+            {Comment}           { [:T_COMMENT, text] }
+            \/\/[^\n]*          { [:T_COMMENT, text] }
+            \#pragma[^\n]*\n    { [:T_PRAGMA, text] }
+            \#[^\n]*\n          { [:T_PREPROCESSOR, text] }
+            \{                  { [:T_LEFT_CURLY_BRACKET, text] }
+            \}                  { [:T_RIGHT_CURLY_BRACKET, text] }
+            \[                  { [:T_LEFT_SQUARE_BRACKET, text] }
+            \]                  { [:T_RIGHT_SQUARE_BRACKET, text] }
+            \(                  { [:T_LEFT_PARANTHESIS, text] }
+            \)                  { [:T_RIGHT_PARANTHESIS, text] }
+            \:\:                { [:T_SCOPE, text] }
+            :                   { [:T_COLON, text] }
+            ,                   { [:T_COMMA, text] }
+            ;                   { [:T_SEMICOLON, text] }
+            =                   { [:T_EQUAL, text] }
+            >>                  { [:T_SHIFTRIGHT, text] }
+            <<                  { [:T_SHIFTLEFT, text] }
+            \+                  { [:T_PLUS_SIGN, text] }
+            -                   { [:T_MINUS_SIGN,text] }
+            \*                  { [:T_ASTERISK, text] }
+            \/                  { [:T_SOLIDUS,text] }
+            %                   { [:T_PERCENT_SIGN,text] }
+            ~                   { [:T_TILDE,text] }
+            \|                  { [:T_VERTICAL_LINE,text] };
+            \^                  { [:T_CIRCUMFLEX,text] }
+            &                   { [:T_AMPERSAND,text] }
+            <                   { [:T_LESS_THAN_SIGN,text] }
+            >                   { [:T_GREATER_THAN_SIGN, text] }
+            const(?!{IDENT})      { [:T_CONST, text] }
+            typedef(?!{IDENT})    { [:T_TYPEDEF, text] }
+            float(?!{IDENT})      { [:T_FLOAT, text] }
+            double(?!{IDENT})     { [:T_DOUBLE, text] }
+            char(?!{IDENT})       { [:T_CHAR, text] }
+            wchar(?!{IDENT})      { [:T_WCHAR, text] }
+            fixed(?!{IDENT})      { [:T_FIXED, text] }
+            boolean(?!{IDENT})    { [:T_BOOLEAN, text] }
+            string(?!{IDENT})     { [:T_STRING, text] }
+            wstring(?!{IDENT})    { [:T_WSTRING, text] }
+            void(?!{IDENT})       { [:T_VOID, text] }
+            unsigned(?!{IDENT})   { [:T_UNSIGNED, text] }
+            long(?!{IDENT})       { [:T_LONG, text] }
+            short(?!{IDENT})      { [:T_SHORT, text] }
+            FALSE                 { [:T_FALSE, text] }
+            TRUE                  { [:T_TRUE, text] }
+            struct(?!{IDENT})     { [:T_STRUCT, text] }
+            union(?!{IDENT})      { [:T_UNION, text] }
+            switch(?!{IDENT})     { [:T_SWITCH, text] }
+            case(?!{IDENT})       { [:T_CASE, text] }
+            default(?!{IDENT})    { [:T_DEFAULT, text] }
+            enum(?!{IDENT})       { [:T_ENUM, text] }
+            interface(?!{IDENT})  { [:T_INTERFACE, text] }
+            inout(?!{IDENT})      { [:T_INOUT, text] }
+            in(?!{IDENT})         { [:T_IN, text] }
+            out(?!{IDENT})          { [:T_OUT, text] }
+            abstract(?!{IDENT})     { [:T_ABSTRACT, text] }
+            valuetype(?!{IDENT})    { [:T_VALUETYPE, text] }
+            truncatable(?!{IDENT})  { [:T_TRUNCATABLE, text] }
+            supports(?!{IDENT})     { [:T_SUPPORTS, text] }
+            custom(?!{IDENT})       { [:T_CUSTOM, text] }
+            public(?!{IDENT})       { [:T_PUBLIC, text] }
+            private(?!{IDENT})      { [:T_PRIVATE, text] }
+            factory(?!{IDENT})      { [:T_FACTORY, text] }
+            native(?!{IDENT})       { [:T_NATIVE, text] }
+            ValueBase             { [:T_VALUEBASE, text] }
+
+            module(?!{IDENT})     { [:T_MODULE, text] }
+            octet(?!{IDENT})      { [:T_OCTET, text] }
+            any(?!{IDENT})        { [:T_ANY, text] }
+            sequence(?!{IDENT})   { [:T_SEQUENCE, text] }
+            readonly(?!{IDENT})   { [:T_READONLY, text] }
+            attribute(?!{IDENT})  { [:T_ATTRIBUTE, text] }
+            exception(?!{IDENT})  { [:T_EXCEPTION, text] }
+            oneway(?!{IDENT})     { [:T_ONEWAY, text] }
+            raises(?!{IDENT})     { [:T_RAISES, text] }
+            context(?!{IDENT})    { [:T_CONTEXT, text] }
+
+            Object(?!{IDENT})     { [:T_OBJECT, text] }
+            Principal           { [:T_PRINCIPAL, text] }
+
+
+            L{String_Literal}   { [:T_WIDE_STRING_LITERAL, text] }
+            L{Char_Literal}     { [:T_WIDE_CHARACTER_LITERAL, text] }
+            {CORBA_Identifier}  { [:T_IDENTIFIER, text] }
+            {Float_Literal1}    { [:T_FLOATING_PT_LITERAL, text] }
+            {Float_Literal2}    {
+                                  text = text.split('.').join('.0')
+                                  [:T_FLOATING_PT_LITERAL, text]
+                                }
+            {Float_Literal3}    { [:T_FLOATING_PT_LITERAL, text] }
+            {Fixed_Literal4}    { [:T_FIXED_PT_LITERAL, text.gsub(/[Dd]/,'')] }
+            {Float_Literal4}    { [:T_FLOATING_PT_LITERAL, text] }
+            {Fixed_Literal2}    { [:T_FIXED_PT_LITERAL, text.gsub(/[.dD]/,'')] }
+            {Float_Literal5}    { [:T_FLOATING_PT_LITERAL, "#{text}0"] }
+            {Float_Literal6}    { [:T_FLOATING_PT_LITERAL, "0#{text}"] }
+            {Fixed_Literal3}    {
+                             [:T_FIXED_PT_LITERAL, "0#{text.gsub(/[dD]/, '')}"]
+                                }
+            {Float_Literal7}    { [:T_FLOATING_PT_LITERAL, "0#{text}"] }
+            {Fixed_Literal1}    { [:T_FIXED_PT_LITERAL, text.gsub(/[dD]/,'')] }
+            {Hex_Literal}       { [:T_INTEGER_LITERAL, text] }
+            {Oct_Literal}       { [:T_INTEGER_LITERAL, text] }
+            {Int_Literal}       { [:T_INTEGER_LITERAL, text] }
+            {Char_Literal}      { [:T_CHARACTER_LITERAL, text] }
+            {String_Literal}    { [:T_STRING_LITERAL, text] }
+            [^\s\n\r]           { [:T_UNKNOWN, text] }
+end
+end
+end