Append only contract

peepeth.sol

pragma solidity ^0.4.8;

contract AppendOnly {
  bytes32 tip;
  
  function AppendOnly(bytes32 tail) {
    tip = tail
  }
  
  function join(newHash) {
    tip = keccak256(tip, newHash)
  }
}