byte_buffer.sa
上传用户:afrynkmhm
上传日期:2007-01-06
资源大小:1262k
文件大小:1k
源码类别:

编译器/解释器

开发平台:

Others

  1. (* 
  2.   ANTLR Translator Generator
  3.   Project led by Terence Parr at http://www.jGuru.com
  4.   Software rights: http://www.antlr.org/RIGHTS.html
  5.  
  6.   $Id: //depot/code/org.antlr/release/antlr-2.7.0/lib/sather/Antlr/byte_buffer.sa#1 $
  7. *)
  8. class ANTLR_BYTE_BUFFER is
  9.    include ANTLR_INPUT_BUFFER;
  10.    create( in : $ISTREAM ) : SAME pre ~void(in) is
  11.       res : SAME := new;
  12.       res.input := in;
  13.       res.init;
  14.       return res;
  15.    end;
  16.    fill ( amount : INT ) is
  17.       sync_consume;
  18.       loop while!( queue.num_entries < amount + marker_offset );
  19.  queue.append( input.get );
  20.       end;      
  21.    end;
  22.    
  23. end;