YkLib 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: bf430d6f3432f884d08879a9d63585081d1e75ed9ea12e0b322c5e1b26c9d52d
+  data.tar.gz: 8b449916ced8f566678ab7afee1fae6e78cb986dea16641cc4a639667d8ba50a
+SHA512:
+  metadata.gz: c3bbfb7f4c8ea3bf9dd974a147a985a9b91d8228ecd8bd0cf815b23fe186ad22a50373d3aefd1b447dce8512639ccc45aa571ddf0e3e611233eab5c792ddcbda
+  data.tar.gz: bdee6c44eeccd13d4108ddc5c3a5d57ab97137813acbac91a9d0dd3d8fe396e9b2c15bbe23b1393028efba2ec2293db6a1e3706cabd1035b3324d4de21493f47

data/.gitignore

@@ -0,0 +1,11 @@
+/.bundle/
+/.yardoc
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+
+# rspec failure tracking
+.rspec_status

data/.rspec

@@ -0,0 +1,3 @@
+--format documentation
+--color
+--require spec_helper

data/.travis.yml

@@ -0,0 +1,6 @@
+---
+language: ruby
+cache: bundler
+rvm:
+  - 2.7.1
+before_install: gem install bundler -v 2.1.4

data/CODE_OF_CONDUCT.md

@@ -0,0 +1,74 @@
+# Contributor Covenant Code of Conduct
+
+## Our Pledge
+
+In the interest of fostering an open and welcoming environment, we as
+contributors and maintainers pledge to making participation in our project and
+our community a harassment-free experience for everyone, regardless of age, body
+size, disability, ethnicity, gender identity and expression, level of experience,
+nationality, personal appearance, race, religion, or sexual identity and
+orientation.
+
+## Our Standards
+
+Examples of behavior that contributes to creating a positive environment
+include:
+
+* Using welcoming and inclusive language
+* Being respectful of differing viewpoints and experiences
+* Gracefully accepting constructive criticism
+* Focusing on what is best for the community
+* Showing empathy towards other community members
+
+Examples of unacceptable behavior by participants include:
+
+* The use of sexualized language or imagery and unwelcome sexual attention or
+advances
+* Trolling, insulting/derogatory comments, and personal or political attacks
+* Public or private harassment
+* Publishing others' private information, such as a physical or electronic
+  address, without explicit permission
+* Other conduct which could reasonably be considered inappropriate in a
+  professional setting
+
+## Our Responsibilities
+
+Project maintainers are responsible for clarifying the standards of acceptable
+behavior and are expected to take appropriate and fair corrective action in
+response to any instances of unacceptable behavior.
+
+Project maintainers have the right and responsibility to remove, edit, or
+reject comments, commits, code, wiki edits, issues, and other contributions
+that are not aligned to this Code of Conduct, or to ban temporarily or
+permanently any contributor for other behaviors that they deem inappropriate,
+threatening, offensive, or harmful.
+
+## Scope
+
+This Code of Conduct applies both within project spaces and in public spaces
+when an individual is representing the project or its community. Examples of
+representing a project or community include using an official project e-mail
+address, posting via an official social media account, or acting as an appointed
+representative at an online or offline event. Representation of a project may be
+further defined and clarified by project maintainers.
+
+## Enforcement
+
+Instances of abusive, harassing, or otherwise unacceptable behavior may be
+reported by contacting the project team at github@you.dix.asia. All
+complaints will be reviewed and investigated and will result in a response that
+is deemed necessary and appropriate to the circumstances. The project team is
+obligated to maintain confidentiality with regard to the reporter of an incident.
+Further details of specific enforcement policies may be posted separately.
+
+Project maintainers who do not follow or enforce the Code of Conduct in good
+faith may face temporary or permanent repercussions as determined by other
+members of the project's leadership.
+
+## Attribution
+
+This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
+available at [https://contributor-covenant.org/version/1/4][version]
+
+[homepage]: https://contributor-covenant.org
+[version]: https://contributor-covenant.org/version/1/4/

data/Gemfile

@@ -0,0 +1,7 @@
+source "https://rubygems.org"
+
+# Specify your gem's dependencies in YkLib.gemspec
+gemspec
+
+gem "rake", "~> 12.0"
+gem "rspec", "~> 3.0"

data/Gemfile.lock

@@ -0,0 +1,34 @@
+PATH
+  remote: .
+  specs:
+    YkLib (0.1.0)
+
+GEM
+  remote: https://rubygems.org/
+  specs:
+    diff-lcs (1.5.0)
+    rake (12.3.3)
+    rspec (3.12.0)
+      rspec-core (~> 3.12.0)
+      rspec-expectations (~> 3.12.0)
+      rspec-mocks (~> 3.12.0)
+    rspec-core (3.12.0)
+      rspec-support (~> 3.12.0)
+    rspec-expectations (3.12.2)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.12.0)
+    rspec-mocks (3.12.3)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.12.0)
+    rspec-support (3.12.0)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  YkLib!
+  rake (~> 12.0)
+  rspec (~> 3.0)
+
+BUNDLED WITH
+   2.1.4

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2023 yougaein
+
+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/README.md

@@ -0,0 +1,44 @@
+# YkLib
+
+Welcome to your new gem! In this directory, you'll find the files you need to be able to package up your Ruby library into a gem. Put your Ruby code in the file `lib/YkLib`. To experiment with that code, run `bin/console` for an interactive prompt.
+
+TODO: Delete this and the text above, and describe your gem
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'YkLib'
+```
+
+And then execute:
+
+    $ bundle install
+
+Or install it yourself as:
+
+    $ gem install YkLib
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Development
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/[USERNAME]/YkLib. This project is intended to be a safe, welcoming space for collaboration, and contributors are expected to adhere to the [code of conduct](https://github.com/[USERNAME]/YkLib/blob/master/CODE_OF_CONDUCT.md).
+
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](https://opensource.org/licenses/MIT).
+
+## Code of Conduct
+
+Everyone interacting in the YkLib project's codebases, issue trackers, chat rooms and mailing lists is expected to follow the [code of conduct](https://github.com/[USERNAME]/YkLib/blob/master/CODE_OF_CONDUCT.md).

data/Rakefile

@@ -0,0 +1,6 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :default => :spec

data/YkLib.gemspec

@@ -0,0 +1,29 @@
+require_relative 'lib/YkLib/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "YkLib"
+  spec.version       = YkLib::VERSION
+  spec.authors       = ["yougain"]
+  spec.email         = ["from-github@you.dix.asia"]
+
+  spec.summary       = %q{Yk support library}
+  spec.description   = %q{Yk support library}
+  spec.homepage      = "https://github.com/Yougain/YkLib"
+  spec.license       = "MIT"
+  spec.required_ruby_version = Gem::Requirement.new(">= 2.3.0")
+
+  spec.metadata["allowed_push_host"] = "https://rubygems.org"
+
+  spec.metadata["homepage_uri"] = "https://github.com/Yougain/YkLib"
+  spec.metadata["source_code_uri"] = "https://github.com/Yougain/YkLib"
+  spec.metadata["changelog_uri"] = "https://github.com/Yougain/YkLib"
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+end

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "YkLib"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start(__FILE__)

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/lib/YkLib/Yk/__advance__.rb

@@ -0,0 +1,151 @@
+#!/usr/bin/env ruby
+
+
+require 'generator'
+require 'delegate'
+require 'Yk/__defun__'
+
+
+class A__Advance__ < Exception
+	def initialize (cc)
+		@cc = cc
+		super "advance"
+	end
+	def resume
+		@cc.call
+	end
+end
+
+
+def __advance__
+	callcc do |cc|
+		raise A__Advance__.new(cc)
+	end
+end
+
+class Object
+	def __adv__
+		A__Adv__.new(self)
+	end
+end
+
+
+class A__Adv__
+	class DefunDelegator < Delegator
+		def __defun__ (*arg, &proc)
+			super
+		end
+		def __getobj__
+			@target__
+		end
+		def __setobj__ (t)
+			@target__ = t
+		end
+		def coerce (other)
+			[other, @target__]
+		end
+	end
+	def initialize (obj)
+		@obj = obj
+	end
+	def __toAry__ (*args)
+		args
+	end
+	def method_missing (itName, *args)
+		ret = nil
+		gen = Generator.new do |g|
+			ret = @obj.method(itName).call(*args) do |*bag|
+				g.yield *bag
+			end
+		end
+		argsCue = nil
+		proxies = nil
+		pushCue = Proc.new do
+			if gen.next?
+				if argsCue == nil
+					ag = __toAry__(*gen.next)
+					argsCue = [ag]
+					proxies = []
+					ag.each_index do |i|
+						e = ag[i]
+						d = DefunDelegator.new(e)
+						d.__defun__ :__next__, i do |no, *c|
+							cnt = c[0]
+							cnt ||= 1
+							if cnt == 0
+								proxies[no]
+							else
+								(cnt - argsCue.size).times do
+									if !pushCue.call
+										break
+									end
+								end
+								if cnt <= argsCue.size
+									argsCue[cnt - 1][no]
+								end
+							end
+						end
+						proxies.push d
+					end
+				else
+					ag = __toAry__(*gen.next)
+					argsCue.push ag
+				end
+				true
+			else
+				false
+			end
+		end
+		setNext = Proc.new do
+			if (argsCue == nil || argsCue.size == 0) && !pushCue.call
+				false
+			else
+				proxies.each_index do |i|
+					proxies[i].__setobj__(argsCue[0][i])
+				end
+				argsCue.shift
+				true
+			end
+		end
+		while true
+			begin
+				if setNext.call
+					yield *proxies
+				else
+					break
+				end
+			rescue A__Advance__ => e
+				if setNext.call
+					e.resume
+				else
+					break
+				end
+			end
+		end
+		ret
+	end
+end
+
+
+if File.expand_path(__FILE__) == File.expand_path($0)
+
+arr = [1, 2, 3, 4, 5, 6, 7, 8]
+
+
+arr.__adv__.each do |e|
+	print "cur:#{e.inspect}, next:#{e.next.inspect}\n"
+	if e == 4
+		p "advancing: #{e}, less than 5: #{5 > e}"
+		p "next: #{e.__next__},  less than 5: #{5 > e}"
+		__advance__
+		p "adcvanced: #{e}, less than 5: #{5 > e}"
+	end
+end
+
+arr.__adv__.each do |e|
+	__advance__
+	p e
+end
+
+
+end

data/lib/YkLib/Yk/__defun__.rb

@@ -0,0 +1,44 @@
+
+class Object
+	def __defun__ (name, *sargs, **sopts, &sbl)
+		(class << self;self;end).instance_eval do
+			if sbl
+				define_method name do |*args, **opts, &bl|
+					sbl.call *(sargs + args), **(sopts.merge opts), &bl
+				end
+			elsif sopts.empty?
+				if sargs.empty?
+					define_method name do
+						nil
+					end
+				elsif sargs.size == 1
+					define_method name do
+						sargs[0]
+					end
+				else
+					define_method name do
+						sargs
+					end
+				end
+			else
+				if sargs.empty?
+					define_method name do
+						sopts
+					end
+				else
+					define_method name do
+						sargs + [sopts]
+					end
+				end
+			end
+		end
+		self
+	end
+	def __undefun__ (name)
+		(class << self;self;end).instance_eval do
+			remove_method name
+		end
+		self
+	end
+end
+