home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 mARCH / PCWK3A99.iso / Linux / DDD331 / DDD-3_1_.000 / DDD-3_1_ / ddd-3.1.1 / ddd / yacctoC.sun < prev   
Text File  |  1998-03-25  |  3KB  |  75 lines
  1. # $Id: yacctoC.sun,v 1.5 1998/03/25 12:46:58 zeller Exp $
  2. # Adapt YACC output for C++ usage
  3. # (Happens to be working on my Sun using SunOS 4.1.1)
  4.  
  5. # Copyright (C) 1995 Technische Universitaet Braunschweig, Germany.
  6. # Written by Andreas Zeller <zeller@ips.cs.tu-bs.de>.
  7. # 
  8. # This file is part of the ICE Library.
  9. # 
  10. # The ICE Library is free software; you can redistribute it and/or
  11. # modify it under the terms of the GNU Library General Public
  12. # License as published by the Free Software Foundation; either
  13. # version 2 of the License, or (at your option) any later version.
  14. # 
  15. # The ICE Library is distributed in the hope that it will be useful,
  16. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  17. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  18. # See the GNU Library General Public License for more details.
  19. # 
  20. # You should have received a copy of the GNU Library General Public
  21. # License along with the ICE Library -- see the file COPYING.LIB.
  22. # If not, write to the Free Software Foundation, Inc.,
  23. # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  24. # 
  25. # ICE is the incremental configuration environment.
  26. # For details, see the ICE World-Wide-Web page, 
  27. # `http://www.cs.tu-bs.de/softech/ice/',
  28. # or send a mail to the ICE developers <ice@ips.cs.tu-bs.de>.
  29.  
  30. # Declare functions
  31. 1i\
  32. // This file was modified for -*- C++ -*-\
  33. // using $RCSfile: yacctoC.sun,v $ $Revision: 1.5 $\
  34. extern void yyerror(char *s);\
  35. extern int yylex();\
  36.  
  37. # Undeclare malloc and realloc (not needed in C++ version)
  38. s!extern char \*malloc(), \*realloc();!// &!
  39.  
  40. # Adapt yytoks[] to disable warnings
  41. \!^yytoktype!,\!^}!s![^,]*,[^,]*!{&}!
  42.  
  43. # Make YYSTYPE a struct such that we can store class objects
  44. # (use anonymous unions to save space!)
  45. s!^typedef union\(.*\)$!typedef struct _YYSTYPE \1!
  46.  
  47. # Make sure we use new/delete instead of malloc/free
  48. # (a MUST if we use class objects)
  49.  
  50. # (y*)malloc(x*sizeof(y)) -> new x[y]
  51. s!([^\*]*\* *) *malloc *(\([^\*]*\)\* *sizeof *(\([^)]*\)) *)!new \2[\1]!g
  52.  
  53. # free(x) -> delete[] x
  54. s!free *(\([^)]*\))!delete[] \1!g
  55.  
  56. # realloc -> own code
  57. \!.*yymaxdepth += YYMAXDEPTH!,\!}!c\
  58.             int new_yymaxdepth = yymaxdepth + YYMAXDEPTH;\
  59.             YYSTYPE *new_yyv = new YYSTYPE [new_yymaxdepth];\
  60.             int *new_yys = new int [new_yymaxdepth];\
  61.             if (new_yyv == 0 || new_yys == 0)\
  62.             {\
  63.                 yyerror( "yacc stack overflow" );\
  64.                 return(1);\
  65.             }\
  66.             for (unsigned yycopy = 0; yycopy < yymaxdepth; \
  67.                  yycopy++)\
  68.             {\
  69.                 new_yyv[yycopy] = yyv[yycopy];\
  70.                 new_yys[yycopy] = yys[yycopy];\
  71.             }\
  72.             yymaxdepth = new_yymaxdepth;\
  73.             delete[] yyv; yyv = new_yyv;\
  74.             delete[] yys; yys = new_yys;
  75.