exception.sa
Upload User: afrynkmhm
Upload Date: 2007-01-06
Package Size: 1262k
Code Size: 0k
Development Platform:

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;