Attachment #122974 for bug #154889

View | Details | Raw Unified | Return to bug 154889
Collapse All | Expand All

Lines 23-32 Link Here

(-)clisp-2.41.orig/modules/fastcgi/Makefile.in (-2 / +2 lines)
23	$(CLISP) -c fastcgi.lisp	23	$(CLISP) -c fastcgi.lisp
24		24
25	fastcgi.o: fastcgi.c	25	fastcgi.o: fastcgi.c
26	$(CC) $(CPPFLAGS) $(CFLAGS) $(INCLUDES) -I.. -c fastcgi.c	26	$(CC) $(CPPFLAGS) $(CFLAGS) -I$(INCLUDES) -I.. -c fastcgi.c
27		27
28	fastcgi_wrappers.o: fastcgi_wrappers.c	28	fastcgi_wrappers.o: fastcgi_wrappers.c
29	$(CC) $(CPPFLAGS) $(CFLAGS) $(INCLUDES) -I.. -c fastcgi_wrappers.c	29	$(CC) $(CPPFLAGS) $(CFLAGS) -I$(INCLUDES) -I.. -c fastcgi_wrappers.c
30		30
31	# Make a module	31	# Make a module
32	clisp-module : all	32	clisp-module : all

Lines 148-153 Link Here

(-)clisp-2.41.orig/modules/fastcgi/fastcgi.lisp.orig (+4 lines)
148	; -------------- "C" functions	148	; -------------- "C" functions
149	;(c-lines "#include \"fastcgi.h\"~%"); completely wrapped	149	;(c-lines "#include \"fastcgi.h\"~%"); completely wrapped
150		150
		151	(eval-when (compile)
		152	;;NB this global affects further compilations in this session
		153	(setq ffi:output-c-functions t))
		154
151	; Our wrappers	155	; Our wrappers
152	(def-call-out fcgi_getenv (:arguments (var c-string)) (:return-type c-string))	156	(def-call-out fcgi_getenv (:arguments (var c-string)) (:return-type c-string))
153	(def-call-out fcgi_env (:arguments) (:return-type (c-array-ptr c-string) :malloc-free))	157	(def-call-out fcgi_env (:arguments) (:return-type (c-array-ptr c-string) :malloc-free))

Return to bug 154889