tgcpu.pas 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960
  1. {
  2. $Id$
  3. Copyright (C) 1998-2000 by Florian Klaempfl
  4. This unit handles the temporary variables stuff for Alpha
  5. This program is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2 of the License, or
  8. (at your option) any later version.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software
  15. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  16. ****************************************************************************
  17. }
  18. unit tgcpu;
  19. interface
  20. uses
  21. tgobj;
  22. type
  23. ttgalpha = Object(ttgobj)
  24. end;
  25. var
  26. tg : ttgalpha;
  27. implementation
  28. begin
  29. tg.init;
  30. end.
  31. {
  32. $Log$
  33. Revision 1.1 2000-07-13 06:30:10 michael
  34. + Initial import
  35. Revision 1.4 2000/01/07 01:14:56 peter
  36. * updated copyright to 2000
  37. Revision 1.3 1999/08/03 00:28:24 florian
  38. - removed the stuff of the last commit :)
  39. Revision 1.2 1999/08/03 00:25:28 florian
  40. * added reg var stuff
  41. Revision 1.1 1999/08/03 00:24:01 michael
  42. + Initial implementation
  43. }