mug 0.4.1 → 0.4.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: a1d1008a00d350eb456faeba3099fa1f4ef91319
-  data.tar.gz: a9acb854fcfb95e52f3b057524ee55113c5c424a
+  metadata.gz: dbc9df2427fedefa9ed326ebaa85af9f94055a20
+  data.tar.gz: 92a464c5eff53dbef69f098f176f4c67fdccf930
 SHA512:
-  metadata.gz: 1811cbb8b2476aaf45d4d79535788da251b1da359d908d8893e42aae36a68f54807ddbf64794c2704b0ef1560411bd0e1cb55b9beb128ab8bfa9f4bdfc64379c
-  data.tar.gz: 0263bd5cf6aa93bcc181684a8a7b7f1b21fbaede2c1d46de2c015d7064bac723e54ba0a6bbf9a01472d6b4b61fa3b688304de6cd374e6c63e430a20d66779bf9
+  metadata.gz: bd5bd64b1442ca799327f41b8e5325d32593c8762448254da80ef9d32f55b2ba92d97de4da152150ce6ee6854a99f5c7fad545017ec542698075a31a111993c9
+  data.tar.gz: 71d71d48de44e8074c336f258a55e8e1ae957f4204a6c12f1b6c1ab8361d9cca2676474a349ce2a1e8978cbd4283609469bd555fffd32441587a1cf54177b9f1

data/lib/mug.rb

@@ -1,5 +1,6 @@
 
 require_relative 'mug/and-or'
+require_relative 'mug/any-and-all'
 require_relative 'mug/apply'
 require_relative 'mug/array/extend'
 require_relative 'mug/array/minus'
@@ -16,6 +17,7 @@ require_relative 'mug/matchdata/each'
 require_relative 'mug/matchdata/hash'
 require_relative 'mug/maybe'
 require_relative 'mug/negativity'
+require_relative 'mug/nonempty'
 require_relative 'mug/rexproc'
 require_relative 'mug/self'
 require_relative 'mug/tau'

data/lib/mug/any-and-all.rb

@@ -0,0 +1,38 @@
+
+module Enumerable
+
+	#
+	# Passes each element of the collection to the given block. The method returns `true` if the
+	# block contains elements that never return `false` or `nil`. If the block is not given, Ruby
+	# adds an implicit block of `{ |obj| obj }` which will cause `and_and_all?` to return `true`
+	# when none of the collection members are `false` or `nil`.
+	#
+	def any_and_all? &block
+		block ||= proc {|obj| obj }
+
+		result = false
+		each do |x|
+			return false unless block[x]
+			result = true
+		end
+		result
+	end
+
+end
+
+=begin
+Copyright (c) 2016, Matthew Kerwin <matthew@kerwin.net.au>
+
+Permission to use, copy, modify, and/or distribute this software for any
+purpose with or without fee is hereby granted, provided that the above
+copyright notice and this permission notice appear in all copies.
+
+THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+=end
+

data/lib/mug/nonempty.rb

@@ -0,0 +1,71 @@
+
+class Array
+	#
+	# Returns +true+ if +self+ contains elements.
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+class Hash
+	#
+	# Returns +true+ if +hsh+ contains elements.
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+class String
+	#
+	# Returns +true+ if +str+ has a length greater than zero.
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+class Symbol
+	#
+	# Returns that +sym+ is not :"".
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+class << ENV
+	#
+	# Returns true when there are environment variables.
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+class Queue
+	#
+	# Returns +true+ if the queue is not empty.
+	#
+	def nonempty?
+		!empty?
+	end
+end
+
+=begin
+Copyright (c) 2016, Matthew Kerwin <matthew@kerwin.net.au>
+
+Permission to use, copy, modify, and/or distribute this software for any
+purpose with or without fee is hereby granted, provided that the above
+copyright notice and this permission notice appear in all copies.
+
+THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+=end
+

data/test/test-any-and-all.rb

@@ -0,0 +1,25 @@
+require 'test/unit'
+$VERBOSE = true
+
+require_relative '../lib/mug/any-and-all'
+class Test_any_and_all < Test::Unit::TestCase
+	def test_any_and_all__block
+		b = proc {|o| o > 1 }
+		[
+			[ false, [] ],
+			[ false, [3,0,9] ],
+			[ true,  [3,5,9] ],
+		].each do |x, a|
+			assert_equal( x, a.any_and_all?(&b) )
+		end
+	end
+	def test_any_and_all__noblock
+		[
+			[ false, [] ],
+			[ false, [3,nil,9] ],
+			[ true,  [3,5,9] ],
+		].each do |x, a|
+			assert_equal( x, a.any_and_all? )
+		end
+	end
+end

data/test/test-nonempty.rb

@@ -0,0 +1,30 @@
+require 'test/unit'
+$VERBOSE = true
+
+require_relative '../lib/mug/nonempty'
+require 'thread'
+class Test_nonempty < Test::Unit::TestCase
+	def test_nonempty
+		yes = [
+			[nil],
+			{ :foo => nil },
+			Queue.new.tap{|q| q << 1 },
+			'x',
+			:x,
+		]
+		no = [
+			[],
+			{},
+			Queue.new,
+			'',
+			:'',
+		]
+		yes.each do |obj|
+			assert( obj.nonempty?, "#{obj.inspect} should be nonempty?" )
+		end
+		no.each do |obj|
+			assert( !obj.nonempty?, "#{obj.inspect} should not be nonempty?" )
+		end
+		assert_raise( NoMethodError ) { Object.new.nonempty? }
+	end
+end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: mug
 version: !ruby/object:Gem::Version
-  version: 0.4.1
+  version: 0.4.2
 platform: ruby
 authors:
 - Matthew Kerwin
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2016-01-21 00:00:00.000000000 Z
+date: 2016-02-26 00:00:00.000000000 Z
 dependencies: []
 description: |
   == MUG: Matty's Ultimate Gem
@@ -24,6 +24,7 @@ extra_rdoc_files: []
 files:
 - lib/mug.rb
 - lib/mug/and-or.rb
+- lib/mug/any-and-all.rb
 - lib/mug/apply.rb
 - lib/mug/array.rb
 - lib/mug/array/extend.rb
@@ -47,12 +48,14 @@ files:
 - lib/mug/matchdata/hash.rb
 - lib/mug/maybe.rb
 - lib/mug/negativity.rb
+- lib/mug/nonempty.rb
 - lib/mug/rexproc.rb
 - lib/mug/self.rb
 - lib/mug/tau.rb
 - lib/mug/to_h.rb
 - lib/mug/top.rb
 - test/test-and-or.rb
+- test/test-any-and-all.rb
 - test/test-apply.rb
 - test/test-array-extend.rb
 - test/test-array-minus.rb
@@ -69,6 +72,7 @@ files:
 - test/test-matchdata_hash.rb
 - test/test-maybe.rb
 - test/test-negativity.rb
+- test/test-nonempty.rb
 - test/test-rexproc.rb
 - test/test-self.rb
 - test/test-tau.rb
@@ -93,29 +97,31 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: '0'
 requirements: []
 rubyforge_project: 
-rubygems_version: 2.4.5
+rubygems_version: 2.5.1
 signing_key: 
 specification_version: 4
 summary: 'MUG: Matty''s Ultimate Gem'
 test_files:
-- test/test-fragile-method-chain.rb
-- test/test-maybe.rb
-- test/test-hashop.rb
-- test/test-loop-with.rb
-- test/test-counts.rb
-- test/test-array-minus.rb
-- test/test-bool.rb
+- test/test-clamp.rb
 - test/test-rexproc.rb
 - test/test-tau.rb
-- test/test-apply.rb
-- test/test-clamp.rb
-- test/test-iterator-for.rb
-- test/test-negativity.rb
+- test/test-nonempty.rb
+- test/test-matchdata_each.rb
 - test/test-matchdata_hash.rb
-- test/test-self.rb
+- test/test-array-extend.rb
+- test/test-iterator-for.rb
+- test/test-top.rb
 - test/test-and-or.rb
+- test/test-any-and-all.rb
+- test/test-self.rb
+- test/test-counts.rb
+- test/test-negativity.rb
+- test/test-bool.rb
 - test/test-hashmap.rb
-- test/test-matchdata_each.rb
+- test/test-loop-with.rb
+- test/test-maybe.rb
+- test/test-hashop.rb
 - test/test-iterator-method.rb
-- test/test-array-extend.rb
-- test/test-top.rb
+- test/test-apply.rb
+- test/test-array-minus.rb
+- test/test-fragile-method-chain.rb