- Timestamp:
- 03/24/09 13:57:12 (11 years ago)
- Location:
- chicken/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
chicken/trunk/rules.make
r13872 r13888 1212 1212 1213 1213 dist: distfiles 1214 $(CSI) -s $(SRCDIR)scripts/makedist.scm 1214 $(CSI) -s $(SRCDIR)scripts/makedist.scm --platform=$(PLATFORM) CHICKEN=$(CHICKEN) 1215 1215 1216 1216 html: -
chicken/trunk/support.scm
r13800 r13888 116 116 (let ((out (current-error-port)) 117 117 (loc (and (symbol? msg) 118 ( begin118 (let ((loc msg)) 119 119 (set! msg (car args)) 120 120 (set! args (cdr args)) 121 msg))))121 loc)))) 122 122 (if loc 123 123 (fprintf out "Syntax error (~a): ~a~%~%" loc msg)
Note: See TracChangeset
for help on using the changeset viewer.