2
0

rasm.pas 2.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. {
  2. $Id$
  3. Copyright (c) 1998-2002 by The Free Pascal Team
  4. This unit does the parsing process for the inline assembler
  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 Rasm;
  19. {$i fpcdefs.inc}
  20. Interface
  21. uses
  22. node;
  23. {
  24. This routine is called to parse the instructions in assembler
  25. blocks. It returns a complete list of directive and instructions
  26. }
  27. function assemble: tnode;
  28. Implementation
  29. uses
  30. { common }
  31. cutils,cclasses,
  32. { global }
  33. globtype,globals,verbose,
  34. systems,
  35. { aasm }
  36. cpubase,aasmbase,aasmtai,aasmcpu,
  37. { symtable }
  38. symconst,symbase,symtype,symsym,symtable,
  39. { pass 1 }
  40. nbas,
  41. { parser }
  42. scanner
  43. // ,rautils
  44. ;
  45. function assemble : tnode;
  46. begin
  47. result:=nil;
  48. end;
  49. Begin
  50. end.
  51. {
  52. $Log$
  53. Revision 1.2 2003-09-03 15:55:01 peter
  54. * NEWRA branch merged
  55. Revision 1.1.2.1 2003/09/01 21:02:55 peter
  56. * sparc updates for new tregister
  57. Revision 1.1 2002/08/23 10:08:28 mazen
  58. *** empty log message ***
  59. Revision 1.2 2002/08/11 06:14:41 florian
  60. * fixed powerpc compilation problems
  61. Revision 1.1 2002/08/10 14:52:52 carl
  62. + moved target_cpu_string to cpuinfo
  63. * renamed asmmode enum.
  64. * assembler reader has now less ifdef's
  65. * move from nppcmem.pas -> ncgmem.pas vec. node.
  66. }