00001 //tabstop=4 00002 //*****************************************************************************/ 00003 // Project: jpl 00004 // 00005 // File: $Id$ 00006 // Date: $Date$ 00007 // Author: Fred Dushin <fadushin@syr.edu> 00008 // 00009 // 00010 // Description: 00011 // 00012 // 00013 // ------------------------------------------------------------------------- 00014 // Copyright (c) 1998 Fred Dushin 00015 // All rights reserved. 00016 // 00017 // This library is free software; you can redistribute it and/or 00018 // modify it under the terms of the GNU Library Public License 00019 // as published by the Free Software Foundation; either version 2 00020 // of the License, or (at your option) any later version. 00021 // 00022 // This library is distributed in the hope that it will be useful, 00023 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00024 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00025 // GNU Library Public License for more details. 00026 //*****************************************************************************/ 00027 package jpl.fli; 00028 00029 00030 00031 //----------------------------------------------------------------------/ 00032 // atom_t 00053 // Implementation notes: 00054 // 00055 //----------------------------------------------------------------------/ 00056 public class atom_t 00057 extends LongHolder 00058 { 00059 //------------------------------------------------------------------/ 00060 // toString 00066 // Implementation notes: 00067 // 00068 //------------------------------------------------------------------/ 00069 public String 00070 toString() 00071 { 00072 return Prolog.atom_chars( this ); 00073 } 00074 00075 protected void finalize() throws Throwable { 00076 00077 super.finalize(); 00078 Prolog.unregister_atom( this); 00079 } 00080 } 00081 00082 //345678901234567890123456789012346578901234567890123456789012345678901234567890