Mercurial > hg > xemacs-beta

comparison lib-src/make-docfile.c @ 1111:184461bc8de4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-11-18 06:52:23 by ben] warning fixes, etc. * s/cygwin32.h: -fvtable-thunks is obsolete in GCC 3 and generates warnings. * s/mingw32.h: * s/windowsnt.h: Comment fixes. * emodules.h: Fix warnings from redefining symbols. * eval.c: Fix C++ errors -- no automatic casting between function pointers and void *, function declarations inside of functions not allowed. * event-Xt.c (emacs_Xt_enqueue_focus_event): Warning fixes. * fileio.c (Ffile_truename): Warning fixes. Use LOCAL_TO_WIN32_FILE_FORMAT rather than duplicating it. * glyphs-x.c: Fix style. * intl-auto-encap-win32.c: * intl-auto-encap-win32.h: * intl-encap-win32.c: * intl-encap-win32.c (qxeRegConnectRegistry): * syswindows.h (RegConnectRegistry): DdeCreateStringHandle needs to be manual due to new Cygwin bug. * intl-win32.c: wcslen/wcscmp don't seem to exist under G++ 3, Cygwin. * lisp.h: * lisp-union.h: * lisp-disunion.h: * process-unix.c (unix_send_process): Ugh, C needs volatile and C++ must not have volatile. Remove previous volatile hacks, which don't seem to be working any more. * sheap.c (STATIC_HEAP_SLOP): Try to get a working Cygwin build with old unexec. * sheap.c (more_static_core): No NL's in literals allowed. * symbols.c (Fset): Fix C++ errors. * syswindows.h: Fix Cygwin complaints now that some missing structs have been added. aclocal.m4: Disable shared library modules under Cygwin for the moment, since we need some more tricky coding done and I don't have the time right now. configure.in, configure.usage: code-files.el, loadhist.el: Fix warnings. package-get.el: Fix warnings. NOTE: This was already fixed awhile ago, but reverted by Steve Y. Please be careful. postgresql/Makefile.in.in: Removed. Move common stuff into modues/common/Makefile.common. (Also add extraclean target and a couple of other fixes in that file.) postgresql/configure.ac: Extract out common configure stuff into modules/common/configure-{pre,post}.ac. postgresql/postgresql.c: Fix warning. ldap/Makefile.in.in: Removed. Move common stuff into modues/common/Makefile.common. (Also add extraclean target and a couple of other fixes in that file.) ldap/configure.ac: Extract out common configure stuff into modules/common/configure-{pre,post}.ac. common/Makefile.common: Common stuff is here.
author ben
date Mon, 18 Nov 2002 06:53:08 +0000
parents eaedf30d9d76
children 1038bc1b8cb9
comparison
equal deleted inserted replaced
1110:49065a0d2943 1111:184461bc8de4
371 prevc = c; 371 prevc = c;
372 return c; 372 return c;
373 } 373 }
374 374
375 375
376 char buf[128]; 376 char globalbuf[128];
377 377
378 /* Skip a C string from INFILE, 378 /* Skip a C string from INFILE,
379 and return the character that follows the closing ". 379 and return the character that follows the closing ".
380 If printflag is positive, output string contents to outfile. 380 If printflag is positive, output string contents to outfile.
381 If it is negative, store contents in buf. 381 If it is negative, store contents in buf.
385 #define MDGET do { prevc = c; c = getc_iso2022 (infile); } while (0) 385 #define MDGET do { prevc = c; c = getc_iso2022 (infile); } while (0)
386 static int 386 static int
387 read_c_string (FILE *infile, int printflag, int c_docstring) 387 read_c_string (FILE *infile, int printflag, int c_docstring)
388 { 388 {
389 register int prevc = 0, c = 0; 389 register int prevc = 0, c = 0;
390 char *p = buf; 390 char *p = globalbuf;
391 int start = -1; /* XEmacs addition */ 391 int start = -1; /* XEmacs addition */
392 392
393 MDGET; 393 MDGET;
394 while (c != EOF) 394 while (c != EOF)
395 { 395 {
772 while (c != '/') 772 while (c != '/')
773 { 773 {
774 if (c < 0) 774 if (c < 0)
775 goto eof; 775 goto eof;
776 if (defunflag && c == '(') 776 if (defunflag && c == '(')
777 fatal ("Missing doc string for DEFUN %s\n", buf); 777 fatal ("Missing doc string for DEFUN %s\n", globalbuf);
778 c = getc (infile); 778 c = getc (infile);
779 } 779 }
780 c = getc (infile); 780 c = getc (infile);
781 while (c == '*') 781 while (c == '*')
782 c = getc (infile); 782 c = getc (infile);
802 if (defunflag || defvarflag || c == '"') 802 if (defunflag || defvarflag || c == '"')
803 { 803 {
804 /* XEmacs change: the original code is in the "else" clause */ 804 /* XEmacs change: the original code is in the "else" clause */
805 if (ellcc) 805 if (ellcc)
806 fprintf (outfile, " CDOC%s(\"%s\", \"\\\n", 806 fprintf (outfile, " CDOC%s(\"%s\", \"\\\n",
807 defvarflag ? "SYM" : "SUBR", buf); 807 defvarflag ? "SYM" : "SUBR", globalbuf);
808 else 808 else
809 { 809 {
810 putc (037, outfile); 810 putc (037, outfile);
811 putc (defvarflag ? 'V' : 'F', outfile); 811 putc (defvarflag ? 'V' : 'F', outfile);
812 fprintf (outfile, "%s\n", buf); 812 fprintf (outfile, "%s\n", globalbuf);
813 } 813 }
814 c = read_c_string (infile, 1, defunflag || defvarflag); 814 c = read_c_string (infile, 1, defunflag || defvarflag);
815 815
816 /* If this is a defun, find the arguments and print them. If 816 /* If this is a defun, find the arguments and print them. If
817 this function takes MANY or UNEVALLED args, then the C source 817 this function takes MANY or UNEVALLED args, then the C source
848 /* Output them. */ 848 /* Output them. */
849 if (ellcc) 849 if (ellcc)
850 fprintf (outfile, "\\n\\\n\\n\\\n"); 850 fprintf (outfile, "\\n\\\n\\n\\\n");
851 else 851 else
852 fprintf (outfile, "\n\n"); 852 fprintf (outfile, "\n\n");
853 write_c_args (outfile, buf, argbuf, minargs, maxargs); 853 write_c_args (outfile, globalbuf, argbuf, minargs, maxargs);
854 } 854 }
855 if (ellcc) 855 if (ellcc)
856 fprintf (outfile, "\\n\");\n\n"); 856 fprintf (outfile, "\\n\");\n\n");
857 } 857 }
858 } 858 }