view interps/rail/src/Binding.h @ 11686:10d612def8ee draft

<b_jonas> perl -e for $e ("i","u"){ $f="bin/date$e"; open my$i,"<",$f or die "error open $f r"; local$/; $s=<$i> or die; $s=~s/"\\+%Y/\\${d:+-d "\\$d"} $&/ or die; open $o,">",$f or die "error open $f w: $!"; print $o $s or die; close $o or die; print "OK $f\\n" }
author HackEso <hackeso@esolangs.org>
date Fri, 04 Jan 2019 21:29:08 +0000
parents 859f9b4339e6
children
line wrap: on
line source

// Binding.h

#ifndef BINDING_H_RAIL_1
#define BINDING_H_RAIL_1

class Var;

class Binding
{
public:
  Binding();
  explicit Binding(Var * newData);
  ~Binding();

  Binding(Binding const & right);
  Binding & operator=(Binding const & right);

  Var * operator->(void);
  Var const * operator->(void) const;
  Var & operator*(void);
  Var const & operator*(void) const;

  bool null(void);
private:
  Var * data;
};

#endif