gisele-language 0.5.0

data/CHANGELOG.md

@@ -0,0 +1,5 @@
+# 0.5.0 / FIX ME
+
+* Enhancements
+
+  * Birthday!

data/Gemfile

@@ -0,0 +1,12 @@
+source 'http://rubygems.org'
+
+group :runtime do
+  gem "citrus", "~> 2.4"
+  gem "path", "~> 1.2"
+  gem "sexpr", "~> 0.5.0"
+end
+
+group :development do
+  gem "rake", "~> 0.9.2"
+  gem "rspec", "~> 2.11"
+end

data/Gemfile.lock

@@ -0,0 +1,26 @@
+GEM
+  remote: http://rubygems.org/
+  specs:
+    citrus (2.4.1)
+    diff-lcs (1.1.3)
+    path (1.3.0)
+    rake (0.9.2.2)
+    rspec (2.11.0)
+      rspec-core (~> 2.11.0)
+      rspec-expectations (~> 2.11.0)
+      rspec-mocks (~> 2.11.0)
+    rspec-core (2.11.1)
+    rspec-expectations (2.11.1)
+      diff-lcs (~> 1.1.3)
+    rspec-mocks (2.11.1)
+    sexpr (0.5.1)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  citrus (~> 2.4)
+  path (~> 1.2)
+  rake (~> 0.9.2)
+  rspec (~> 2.11)
+  sexpr (~> 0.5.0)

data/LICENCE.md

@@ -0,0 +1,22 @@
+# The MIT Licence
+
+    Copyright (c) 2012 - Bernard Lambeau
+
+    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/Manifest.txt

@@ -0,0 +1,13 @@
+gisele-language.gemspec
+gisele-language.noespec
+CHANGELOG.md
+Gemfile
+Gemfile.lock
+bin/**/*
+lib/**/*
+LICENCE.md
+Manifest.txt
+Rakefile
+README.md
+spec/**/*
+tasks/**/*

data/README.md

@@ -0,0 +1,7 @@
+# Gisele::Language
+
+The Gisele Process Modeling Language
+
+## Links
+
+https://github.com/blambeau/gisele-language

data/Rakefile

@@ -0,0 +1,11 @@
+# We run tests by default
+task :default => :test
+
+#
+# Install all tasks found in tasks folder
+#
+# See .rake files there for complete documentation.
+#
+Dir["tasks/*.rake"].each do |taskfile|
+  load taskfile
+end

data/gisele-language.gemspec

@@ -0,0 +1,188 @@
+# We require your library, mainly to have access to the VERSION number.
+# Feel free to set $version manually.
+$LOAD_PATH.unshift File.expand_path('../lib', __FILE__)
+require "gisele-language/version"
+$version = Gisele::Language::Version.to_s
+
+#
+# This is your Gem specification. Default values are provided so that your library
+# should be correctly packaged given what you have described in the .noespec file.
+#
+Gem::Specification.new do |s|
+
+  ################################################################### ABOUT YOUR GEM
+
+  # Gem name (required)
+  s.name = "gisele-language"
+
+  # Gem version (required)
+  s.version = $version
+
+  # A short summary of this gem
+  #
+  # This is displayed in `gem list -d`.
+  s.summary = "The Gisele Process Modeling Language"
+
+  # A long description of this gem (required)
+  #
+  # The description should be more detailed than the summary.  For example,
+  # you might wish to copy the entire README into the description.
+  s.description = "Provides the parser + compiler infrastructure for the Gisele process modeling language."
+
+  # The URL of this gem home page (optional)
+  s.homepage = "https://github.com/blambeau/gisele-language"
+
+  # Gem publication date (required but auto)
+  #
+  # Today is automatically used by default, uncomment only if
+  # you know what you do!
+  #
+  # s.date = Time.now.strftime('%Y-%m-%d')
+
+  # The license(s) for the library.  Each license must be a short name, no
+  # more than 64 characters.
+  #
+  # s.licences = %w{}
+
+  # The rubyforge project this gem lives under (optional)
+  #
+  # s.rubyforge_project = nil
+
+  ################################################################### ABOUT THE AUTHORS
+
+  # The list of author names who wrote this gem.
+  #
+  # If you are providing multiple authors and multiple emails they should be
+  # in the same order.
+  #
+  s.authors = ["Bernard Lambeau"]
+
+  # Contact emails for this gem
+  #
+  # If you are providing multiple authors and multiple emails they should be
+  # in the same order.
+  #
+  # NOTE: Somewhat strangly this attribute is always singular!
+  #       Don't replace by s.emails = ...
+  s.email  = ["blambeau@gmail.com"]
+
+  ################################################################### PATHS, FILES, BINARIES
+
+  # Paths in the gem to add to $LOAD_PATH when this gem is
+  # activated (required).
+  #
+  # The default 'lib' is typically sufficient.
+  s.require_paths = ["lib"]
+
+  # Files included in this gem.
+  #
+  # By default, we take all files included in the Manifest.txt file on root
+  # of the project. Entries of the manifest are interpreted as Dir[...]
+  # patterns so that lazy people may use wilcards like lib/**/*
+  #
+  here = File.expand_path(File.dirname(__FILE__))
+  s.files = File.readlines(File.join(here, 'Manifest.txt')).
+                 inject([]){|files, pattern| files + Dir[File.join(here, pattern.strip)]}.
+                 collect{|x| x[(1+here.size)..-1]}
+
+  # Test files included in this gem.
+  #
+  s.test_files = Dir["test/**/*"] + Dir["spec/**/*"]
+
+  # The path in the gem for executable scripts (optional)
+  #
+  s.bindir = "bin"
+
+  # Executables included in the gem.
+  #
+  s.executables = (Dir["bin/*"]).collect{|f| File.basename(f)}
+
+  ################################################################### REQUIREMENTS & INSTALL
+  # Remember the gem version requirements operators and schemes:
+  #   =  Equals version
+  #   != Not equal to version
+  #   >  Greater than version
+  #   <  Less than version
+  #   >= Greater than or equal to
+  #   <= Less than or equal to
+  #   ~> Approximately greater than
+  #
+  # Don't forget to have a look at http://lmgtfy.com/?q=Ruby+Versioning+Policies
+  # for setting your gem version.
+  #
+  # For your requirements to other gems, remember that
+  #   ">= 2.2.0"              (optimistic:  specify minimal version)
+  #   ">= 2.2.0", "< 3.0"     (pessimistic: not greater than the next major)
+  #   "~> 2.2"                (shortcut for ">= 2.2.0", "< 3.0")
+  #   "~> 2.2.0"              (shortcut for ">= 2.2.0", "< 2.3.0")
+  #
+
+  #
+  # One call to add_dependency('gem_name', 'gem version requirement') for each
+  # runtime dependency. These gems will be installed with your gem.
+  # One call to add_development_dependency('gem_name', 'gem version requirement')
+  # for each development dependency. These gems are required for developers
+  #
+  s.add_development_dependency("rake", "~> 0.9.2")
+  s.add_development_dependency("rspec", "~> 2.11")
+  s.add_dependency("citrus", "~> 2.4")
+  s.add_dependency("path", "~> 1.2")
+  s.add_dependency("sexpr", "~> 0.5.0")
+
+  # The version of ruby required by this gem
+  #
+  # Uncomment and set this if your gem requires specific ruby versions.
+  #
+  # s.required_ruby_version = ">= 0"
+
+  # The RubyGems version required by this gem
+  #
+  # s.required_rubygems_version = ">= 0"
+
+  # The platform this gem runs on.  See Gem::Platform for details.
+  #
+  # s.platform = nil
+
+  # Extensions to build when installing the gem.
+  #
+  # Valid types of extensions are extconf.rb files, configure scripts
+  # and rakefiles or mkrf_conf files.
+  #
+  s.extensions = []
+
+  # External (to RubyGems) requirements that must be met for this gem to work.
+  # It’s simply information for the user.
+  #
+  s.requirements = nil
+
+  # A message that gets displayed after the gem is installed
+  #
+  # Uncomment and set this if you want to say something to the user
+  # after gem installation
+  #
+  s.post_install_message = nil
+
+  ################################################################### SECURITY
+
+  # The key used to sign this gem.  See Gem::Security for details.
+  #
+  # s.signing_key = nil
+
+  # The certificate chain used to sign this gem.  See Gem::Security for
+  # details.
+  #
+  # s.cert_chain = []
+
+  ################################################################### RDOC
+
+  # An ARGV style array of options to RDoc
+  #
+  # See 'rdoc --help' about this
+  #
+  s.rdoc_options = []
+
+  # Extra files to add to RDoc such as README
+  #
+  s.extra_rdoc_files = Dir["README.md"] + Dir["CHANGELOG.md"] + Dir["LICENCE.md"]
+
+end

data/gisele-language.noespec

@@ -0,0 +1,24 @@
+template-info:
+  name: "rubygem.noe"
+  version: 2.0.0
+variables:
+  lower:
+    gisele-language
+  upper:
+    Gisele::Language
+  version:
+    0.5.0
+  summary: |-
+    The Gisele Process Modeling Language
+  description: |-
+    Provides the parser + compiler infrastructure for the Gisele process modeling language.
+  authors:
+    - {name: Bernard Lambeau, email: blambeau@gmail.com}
+  links:
+    - https://github.com/blambeau/gisele-language
+  dependencies:
+  - {name: citrus,        version: "~> 2.4",    groups: [runtime]}
+  - {name: path,          version: "~> 1.2",    groups: [runtime]}
+  - {name: sexpr,         version: "~> 0.5.0",  groups: [runtime]}
+  - {name: rake,          version: "~> 0.9.2",  groups: [development]}
+  - {name: rspec,         version: "~> 2.11",   groups: [development]}

data/lib/gisele/language/ast/bool_and.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module BoolAnd
+        include Node
+
+        def label
+          (citrus_match && citrus_match.to_s) || "(#{self[1].label} and #{self[2].label})"
+        end
+
+      end # module BoolAnd
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/bool_expr.rb

@@ -0,0 +1,22 @@
+module Gisele
+  module Language
+    module AST
+      module BoolExpr
+        include Node
+
+        def label
+          (citrus_match && citrus_match.to_s) || last.label
+        end
+
+        def negate
+          if last.first == :bool_not
+            Language.sexpr [:bool_expr, last.last]
+          else
+            Language.sexpr [ :bool_expr, [:bool_not, last] ]
+          end
+        end
+
+      end # module BoolExpr
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/bool_not.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module BoolNot
+        include Node
+
+        def label
+          (citrus_match && citrus_match.to_s) || "not(#{last.label})"
+        end
+
+      end # module BoolNot
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/bool_or.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module BoolOr
+        include Node
+
+        def label
+          (citrus_match && citrus_match.to_s) || "(#{self[1].label} or #{self[2].label})"
+        end
+
+      end # module BoolOr
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/case_st.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module CaseSt
+        include Node
+
+        def label
+          (self[1] && self[1].label) || ""
+        end
+
+      end # module CaseSt
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/else_clause.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module ElseClause
+        include Node
+
+        def label
+          "[else]"
+        end
+
+      end # module ElseClause
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/elsif_clause.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module ElsifClause
+        include Node
+
+        def label
+          self[1].label
+        end
+
+      end # module ElsifClause
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/if_st.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module IfSt
+        include Node
+
+        def label
+          self[1].label
+        end
+
+      end # module IfSt
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/node.rb

@@ -0,0 +1,35 @@
+module Gisele
+  module Language
+    module AST
+      module Node
+
+        def citrus_match
+          tracking_markers[:citrus_match]
+        end
+
+        # Returns a label for this AST node
+        def label
+          ""
+        end
+
+        # Checks validity over the definition
+        def ===(sexp)
+          Language[rule_name] === sexp
+        end
+
+      end # module Node
+    end # module AST
+  end # module Language
+end # module Gisele
+require_relative 'task_call_st'
+require_relative 'while_st'
+require_relative 'if_st'
+require_relative 'else_clause'
+require_relative 'elsif_clause'
+require_relative 'case_st'
+require_relative 'when_clause'
+require_relative 'bool_expr'
+require_relative 'bool_and'
+require_relative 'bool_or'
+require_relative 'bool_not'
+require_relative 'var_ref'

data/lib/gisele/language/ast/task_call_st.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module TaskCallSt
+        include Node
+
+        def label
+          last.to_s
+        end
+
+      end # module TaskCallSt
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/var_ref.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module VarRef
+        include Node
+
+        def label
+          last.to_s
+        end
+
+      end # module BoolNot
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/when_clause.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module WhenClause
+        include Node
+
+        def label
+          self[1].label
+        end
+
+      end # module WhenClause
+    end # module AST
+  end # module Language
+end # module Gisele

data/lib/gisele/language/ast/while_st.rb

@@ -0,0 +1,14 @@
+module Gisele
+  module Language
+    module AST
+      module WhileSt
+        include Node
+
+        def label
+          self[1].label
+        end
+
+      end # module WhileSt
+    end # module AST
+  end # module Language
+end # module Gisele