File: fix-for-blhc.patch

package info (click to toggle)
euslisp 9.31%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 55,448 kB
  • sloc: ansic: 41,610; lisp: 3,339; makefile: 286; sh: 238; asm: 138; python: 53
file content (34 lines) | stat: -rw-r--r-- 1,006 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Description: Fix for blhf
 Fix for blhc tests, we need to use default CFLAGS
 .
 euslisp (9.27-1) unstable; urgency=low
 .
Author: Kei Okada <kei.okada@gmail.com>

---
Origin: other
Reviewed-By: Kei Okada <kei.okada@gmail.com>
Last-Update: 2020-07-02

diff --git a/lisp/comp/comp.l b/lisp/comp/comp.l
index abf7b7b..01bc54f 100644
--- a/lisp/comp/comp.l
+++ b/lisp/comp/comp.l
@@ -24,7 +24,7 @@
 (eval-when (load eval)
 
 (defparameter *coptflags* "")
-(defparameter *cflags* "")
+(defparameter *cflags* (format nil " ~A" (or (unix::getenv "CFLAGS") "")))
 (defparameter *defun-list* nil)
 (defparameter *verbose* nil)
 (defparameter *optimize* 2)
@@ -1261,7 +1261,7 @@
 	 (setq file (merge-pathnames ".l" file))
          (if (null (probe-file  file)) 
 	     (error "file ~A not found~%" file)))
-      (warn "compiling file: ~A~%" (namestring file))
+      ;; (warn "compiling file: ~A~%" (namestring file))
       (setq ins (open file))
       (setq *defun-list* nil)
       (when *multipass-optimize*