00001 package edu.ksu.cis.bandera.bir; 00002 00003 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 00004 * Bandera, a Java(TM) analysis and transformation toolkit * 00005 * Copyright (C) 1998, 1999 James Corbett (corbett@hawaii.edu) * 00006 * All rights reserved. * 00007 * * 00008 * This work was done as a project in the SAnToS Laboratory, * 00009 * Department of Computing and Information Sciences, Kansas State * 00010 * University, USA (http://www.cis.ksu.edu/santos). * 00011 * It is understood that any modification not identified as such is * 00012 * not covered by the preceding statement. * 00013 * * 00014 * This work is free software; you can redistribute it and/or * 00015 * modify it under the terms of the GNU Library General Public * 00016 * License as published by the Free Software Foundation; either * 00017 * version 2 of the License, or (at your option) any later version. * 00018 * * 00019 * This work is distributed in the hope that it will be useful, * 00020 * but WITHOUT ANY WARRANTY; without even the implied warranty of * 00021 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * 00022 * Library General Public License for more details. * 00023 * * 00024 * You should have received a copy of the GNU Library General Public * 00025 * License along with this toolkit; if not, write to the * 00026 * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * 00027 * Boston, MA 02111-1307, USA. * 00028 * * 00029 * Java is a trademark of Sun Microsystems, Inc. * 00030 * * 00031 * To submit a bug report, send a comment, or get the latest news on * 00032 * this project and other SAnToS projects, please visit the web-site * 00033 * http://www.cis.ksu.edu/santos * 00034 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ 00035 import ca.mcgill.sable.util.*; 00036 00037 public class AbstractTypeSwitch implements TypeSwitch 00038 { 00039 Object result; 00040 00041 public void caseArray(Array type, Object o) 00042 { 00043 defaultCase(type); 00044 } 00045 public void caseBool(Bool type, Object o) 00046 { 00047 defaultCase(type); 00048 } 00049 public void caseCollection(Collection type, Object o) 00050 { 00051 defaultCase(type); 00052 } 00053 public void caseEnumerated(Enumerated type, Object o) 00054 { 00055 defaultCase(type); 00056 } 00057 public void caseField(Field type, Object o) 00058 { 00059 defaultCase(type); 00060 } 00061 public void caseLock(Lock type, Object o) 00062 { 00063 defaultCase(type); 00064 } 00065 public void caseRange(Range type, Object o) 00066 { 00067 defaultCase(type); 00068 } 00069 public void caseRecord(Record type, Object o) 00070 { 00071 defaultCase(type); 00072 } 00073 public void caseRef(Ref type, Object o) 00074 { 00075 defaultCase(type); 00076 } 00077 public void defaultCase(Object obj) 00078 { 00079 } 00080 public Object getResult() { 00081 return result; 00082 } 00083 public void setResult(Object obj) { 00084 result = obj; 00085 } 00086 }