sclass LongBuffer implements Iterable<Long>, ILongQueue, IntSize {
  long[] data;
  int size;
  
  *() {}
  *(int size) { if (size != 0) data = new long[size]; }
  *(Iterable<Long> l) {
    if (l cast Cl) allocate(l.size());
    addAll(l);
  }
  
  public void add(long i) {
    if (size >= lLongArray(data)) {
      data = resizeLongArray(data, Math.max(1, toInt(Math.min(maximumSafeArraySize(), lLongArray(data)*2L))));
      if (size >= data.length) fail("LongBuffer too large: " + size);
    }
    data[size++] = i;
  }
  
  void allocate(int n) {
    data = resizeLongArray(data, max(n, size()));
  }
  
  void addAll(Iterable<Long> l) {
    if (l != null) for (long i : l) add(i);
  }
  
  long[] toArray() {
    ret size == 0 ? null : resizeLongArray(data, size);
  }
  
  L<Long> toList() {
    ret longArrayToList(data, 0, size);
  }
  
  L<Long> asVirtualList() {
    ret listFromFunction get(size);
  }
  
  void reset { size = 0; }
  void clear { reset(); }
  
  public int size() { ret size; }
  public bool isEmpty() { ret size == 0; }
  
  long get(int idx) {
    if (idx >= size) fail("Index out of range: " + idx + "/" + size);
    ret data[idx];
  }
  
  void set(int idx, long value) {
    if (idx >= size) fail("Index out of range: " + idx + "/" + size);
    data[idx] = value;
  }
  
  long popLast() {
    if (size == 0) fail("empty buffer");
    ret data[--size];
  }
  
  long last() { ret data[size-1]; }
  long nextToLast() { ret data[size-2]; }
  
  toString { ret squareBracket(joinWithSpace(toList())); }
  
  public Iterator<Long> iterator() {
    ret new ItIt<Long> {
      int i = 0;
      
      public bool hasNext() { ret i < size; }
      public Long next() {
        if (!hasNext()) fail("Index out of bounds: " + i);
        ret data[i++];
      }
    };
  }
  
  void trimToSize {
    data = resizeLongArray(data, size);
  }
  
  void remove(int idx) {
    arraycopy(data, idx+1, data, idx, size-1-idx);
    --size;
  }
  
  // don't rely on return value if buffer is empty
  public long poll() { 
    ret size == 0 ? -1 : data[--size];
  }
}

Began life as a copy of #1028793