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

编译器/解释器

开发平台:

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/exception.sa#1 $
  7. *)
  8. abstract class $ANTLR_EXCEPTION < $STR is
  9.    str : STR;
  10. end;
  11. class ANTLR_EXCEPTION < $ANTLR_EXCEPTION is
  12.    attr str : STR;
  13.    message : STR is
  14.       return str;
  15.    end;
  16.    create ( s : STR ) : SAME is
  17.       res ::= new;
  18.       res.str := s;
  19.       return res;
  20.    end;
  21.    
  22. end;