鐃緒申鐃緒申辰箸癲�

0鐃緒申1鐃薯次￥申鐃瞬わ申鐃緒申法 - a2c.get.diary
True鐃緒申鐃獣わ申鐃緒申False鐃叔￥申False鐃緒申鐃獣わ申鐃緒申True鐃祝わ申鐃緒申鐃緒申鐃緒申
鐃淑んかわ申鐃緒申覆鐃緒申箸鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃宿�鐃竣で￥申鐃緒申鐃塾為わ申鐃緒申鐃緒申鐃淑わ申里鐃�
鐃緒申鐃緒申里鐃緒申覆鐃緒申隼廚辰鐃緒申鐃緒申鐃緒申鐃緒申無鐃緒申鐃楯わ申

Closure

鐃緒申鐃緒申楼鐃緒申屬鐃緒申鐃緒申鐃緒申鐃淑のわ申鐃緒申鐃緒申

JavaScript

()鐃緒申鐃術わし鐃緒申鐃緒申鐃緒申perl鐃緒申ruby鐃緒申鐃熟種申鐃緒申鐃緒申

#!/usr/bin/js
var flipflop = function(p){
  p = !p;
  return function(){
    return p = !p;
  };
};

var fl = flipflop();
console.log(fl());
console.log(fl());
console.log(fl());
console.log(fl());

Perl

->()鐃緒申鐃緒ず鐃緒申錣件申鐃緒申鐃�

#!/usr/bin/perl
use 5.010;
use strict;
use warnings;

sub flipflop{
  my $p = !shift;
  sub { $p = !$p }
}

my $fl = flipflop();
say $fl->();
say $fl->();
say $fl->();
say $fl->();

Ruby

call鐃緒申鐃術わし鐃緒申鐃緒申[]鐃熟わ申鐃緒申鐃順い鐃緒申

#!/usr/bin/ruby
def flipflop(p=false)
  p = !p
  Proc.new{ p = !p }
end

fl = flipflop()
puts fl.call
puts fl.call
puts fl[]    # .call 鐃緒申鐃緒申鐃緒申鐃�OK
puts fl[]

Python

Python鐃塾居申鐃緒申鐃�Closure鐃緒申鐃緒申鐃塾わ申覆鐃緒申鐃緒申覆鐃夙わ申鐃曙が動鐃緒申鐃淑わ申鐃緒申

def flipflop(p=False):
  p = not p
  def ret():
    p = not p
    return p
  return ret

fl = flipflop()
print fl()
print fl()
print fl()
print fl()

Python 3鐃緒申鐃夙駕申鐃夙わ申鐃書けるが鐃緒申

def flipflop(p=False):
  p = not p
  def ret():
    nonlocal p
    p = not p
    return p
  return ret

fl = flipflop()
print(fl())
print(fl())
print(fl())
print(fl())

nonlocal鐃緒申鐃緒申鐃緒申鐃順い鐃緒申

Class + Operator Overloading

Perl

鐃緒申鐃緒申鐃熟とにわ申鐃緒申鐃緒申鐃緒申鐃術はわ申鐃曙が鐃緒申鐃瞬種申鐃緒申鐃緒申鐃緒申鐃塾わ申覆鐃緒申鐃�

#!/usr/bin/perl
use 5.010;
use strict;
use warnings;
{
    package FlipFlop;
    use overload
      'bool' => \&fetch,
      '0+'   => \&numify,
      '""'   => \&numify
      ;
    sub new {
        my $class = shift;
        my $self  = !shift;
        bless \$self, $class;
    }
    sub fetch {
        my $self = shift;
        $$self = !$$self;
    }
    sub numify {
      shift->fetch + 0;
    }
}

my $fl = new FlipFlop;
say $fl;
say $fl;
say $fl;
say $fl;

python

bool()鐃叔ワ申鐃純ス鐃夙わ申鐃淑わ申鐃緒申个覆鐃淑わ申鐃塾わ申鐃術わし鐃緒申鐃緒申

#!/usr/bin/python
class FlipFlop:
  def __init__(self, v=False):
    self.x = not bool(v)
  def __nonzero__(self):
    self.x = not self.x
    return self.x

fl = FlipFlop()
print bool(fl)
print bool(fl)
print bool(fl)
print bool(fl)
print fl

ruby

puts o鐃緒申o.to_s鐃緒申鐃緒申鐃循で呼ばわ申鐃塾と異なり、#to_bool鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申瓮緒申奪匹鐃緒申鐃緒申鐃緒申藥誌申了鐃緒申飽鐃緒申曚埜討个鐃緒申箸鐃緒申鐃緒申鐃緒申箸呂覆鐃緒申鐃緒申鐃述わ申Yield鐃緒申鐃緒申忙鐃緒申討鐃緒申泙鐃緒申鐃�

#!/usr/bin/ruby
class FlipFlop
  def initialize(init=false)
    @p = !init
  end
  def to_b
    @p = !@p
  end
end

fl = FlipFlop.new()
puts fl.to_b
puts fl.to_b
puts fl.to_b
puts fl.to_b
puts fl && true # false 鐃祝なってはわ申鐃緒申覆鐃�

Yield

python

鐃緒申鐃緒申鐃熟種申鐃緒申鐃緒申鐃緒申鐃緒申next()鐃緒申鐃緒ず鐃緒申錣件申鐃緒申鐃�

#!/usr/bin/python
def flipflop(p=False):
  p = not not p
  while True:
    yield p
    p = not p

fl = flipflop();
print fl.next();
print fl.next();
print fl.next();
print fl.next();

JavaScript 1.7(鐃緒申鐃緒申)

鐃緒申鐃緒申Firefox/SpiderMonkey鐃緒申鐃緒申鐃緒申鐃楯￥申鐃夙わ申鐃銃わ申鐃淑わ申鐃緒申

var flipflop = function(p){
  p = !!p;
  while(true){
    yield p;
    p = !p;
  };
};

var fl = flipflop();
console.log(fl.next());
console.log(fl.next());
console.log(fl.next());
console.log(fl.next());

Macro

C

鐃春鰹申鐃夙わ申鐃緒申鐃緒申?

#define flip(p) !((p) = !(p))

void main(){
  int p = 0;
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
}

鐃緒申鐃緒申魑い砲鐃緒申覆鐃緒申鐃出わ申鐃緒申任癲�

#define flip(p) ((p)++ & 1)

void main(){
  int p = 0;
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
  printf("%d\n", flip(p));
}

鐃緒申単鐃淑わ申鐃重誌申鐃緒申鐃緒申鐃緒申鐃獣て￥申鐃緒申鐃緒申鐃緒申鐃渋随申鐃緒申鐃緒申鐃緒申

Dan the Binary Blogger

鐃宿居申

Perl

Re: Algorithm - 0鐃緒申1鐃薯次￥申鐃緒申鐃瞬わ申鐃緒申単鐃淑わ申鐃重誌申 - TokuLog 鐃緒申鐃緒申 tokuhirom鐃緒申s blog
Perl5.10 鐃淑わ申 state 鐃緒申鐃縦わ申鐃緒申鐃暑か鐃初、鐃淑駕申鐃塾よう鐃祝書けわ申里任呂覆鐃緒申鐃緒申鐃� 
#!/usr/bin/perl
use 5.010;
use strict;
use warnings;
use Test::More;

sub flipflop {
    state $p = !shift;
    $p = !$p
}

ok !flipflop();
ok flipflop();
ok !flipflop();
ok flipflop();

done_testing;

state鐃緒申鐃薯けわ申鐃塾は￥申$p鐃緒申有鐃緒申鐃緒申鐃緒申鐃淑わ申鐃緒申鐃竣わ申鐃緒申鐃�singleton鐃祝わ申鐃緒申鐃緒申鐃淑わ申鐃獣わ申鐃緒申鐃初。鐃竣わ申

my $true1st  = flipflop(1);
my $false1st = flipflop(0);

鐃夙わ申鐃緒申鐃緒申鐃獣わ申鐃緒申鐃夙￥申鐃叔わ申singleton鐃叔わ申鐃緒申鐃淑わ申state鐃緒申鐃駿ワ申鐃夙プラク鐃銃ワ申鐃緒申鐃緒申鐃夙誌申鐃竣わ申鐃緒申

Python

@dankogai python鐃叔わ申__nonzero__鐃叔はなわ申__call__鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申bool鐃祝ワ申鐃純ス鐃夙わ申鐃緒申必鐃竣なわ申鐃塾では￥申 QT: 404 Blog Not Found:Algorithm - 0鐃緒申1鐃薯次￥申鐃緒申鐃瞬わ申鐃緒申単鐃淑わ申鐃重誌申 http://htn.to/bGWDnqless than a minute ago via webTomohiro Oda
tomooda

()鐃緒申必鐃竣とはわ申鐃緒申鐃緒申鐃緒申鐃曙が鐃緒申鐃瞬よさ鐃緒申鐃緒申

#!/usr/bin/python
class FlipFlop:
  def __init__(self, v=False):
    self.x = not bool(v)
  def __call__(self):
    self.x = not self.x
    return self.x

fl = FlipFlop()
print fl()
print fl()
print fl()
print fl()
print fl

JavaScript

Re: Algorithm - 0鐃緒申1鐃薯次￥申鐃緒申鐃瞬わ申鐃緒申単鐃淑わ申鐃重誌申 - 鐃春っわ申鐃緒申鐃緒申
JavaScript 鐃叔呼び出わ申鐃緒申 () 鐃緒申鐃術わし鐃緒申鐃淑ら、鐃淑駕申鐃塾よう鐃祝書けわ申里任呂覆鐃緒申鐃緒申鐃�

鐃夙わ申鐃緒申鐃緒け鐃叔常申鐃緒申鐃緒申鐃術￥申JS鐃熟わ申鐃緒申之鐃緒申蠅�鐃緒申?

#!/usr/bin/js
var flipflop = function(p){
  return {
    p : 0,
    valueOf : function(){ return this.p = !this.p; },
    toString : valueOf
  };
};
var fl = flipflop();
console.log(+fl);
console.log(+fl);
console.log(+fl);
console.log(+fl);
console.log(fl);
' ).text(); } var query = {s:text}; if (lang) query['l'] = lang; var url = 'http://api.dan.co.jp/lleval.cgi'; var proto = 'json'; if ($.browser.msie || $.browser.opera){ url += '?c=?'; proto += 'p'; } /* falls back to JSONP */ $.get(url, query, function(json){ $(dstNode).html(json2table(json)).hide().show('slow'); }, proto); }; $('#mysignature').click(function(ev){ var text = $(this).text(); var query = {s:text,l:'bf'}; var url = 'http://api.dan.co.jp/lleval.cgi'; var proto = 'json'; if ($.browser.msie || $.browser.opera){ url += '?c=?'; proto += 'p'; } /* falls back to JSONP */ var me = this; $.get(url, query, function(json){ $(me).text(json.stdout).unbind('click').removeClass('bgB'); }, proto); }); })(jQuery);