Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-21 06:39:17 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

previous setting was in wrong place

Browse source
This commit is contained in:
Alex Shinn 2010-08-15 16:51:33 +09:00
parent f49b4ccfc0
commit 32f835e5f2
4 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
Makefile
View file

@ -58,7 +58,7 @@ SO = .dll
EXE = .exe EXE = .exe
CC = gcc CC = gcc
CLIBFLAGS = -shared CLIBFLAGS = -shared
CPPFLAGS += -DSEXP_USE_STRING_STREAMS=0 -DBUILDING_DLL -DSEXP_USE_DEBUG=0 CPPFLAGS += -DSEXP_USE_STRING_STREAMS=0 -DBUILDING_DLL
LDFLAGS += -Wl,--out-implib,libchibi-scheme$(SO).a LDFLAGS += -Wl,--out-implib,libchibi-scheme$(SO).a
STATICFLAGS = -DSEXP_USE_DL=0 STATICFLAGS = -DSEXP_USE_DL=0
LIBDL = LIBDL =
@ -68,7 +68,8 @@ SO = .dll
EXE = .exe EXE = .exe
CC = gcc CC = gcc
CLIBFLAGS = -shared CLIBFLAGS = -shared
LDFLAGS += -DSEXP_USE_STRING_STREAMS=0 -Wl,--out-implib,libchibi-scheme$(SO).a CPPFLAGS += -DSEXP_USE_STRING_STREAMS=0
LDFLAGS += -Wl,--out-implib,libchibi-scheme$(SO).a
else else
SO = .so SO = .so
EXE = EXE =

3
lib/chibi/repl.module
View file

@ -2,5 +2,6 @@
(define-module (chibi repl) (define-module (chibi repl)
(export repl) (export repl)
(import-immutable (scheme)) (import-immutable (scheme))
(import (chibi process)) (import (chibi process)
(chibi term edit-line))
(include "repl.scm")) (include "repl.scm"))

4
lib/chibi/term/edit-line.scm
View file

@ -1,3 +1,7 @@
;;;; edit-line.scm - pure scheme line editing tool
;;
;; Copyright (c) 2010 Alex Shinn. All rights reserved.
;; BSD-style license: http://synthcode.com/license.txt
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; vt100 terminal utilities ;; vt100 terminal utilities

2
lib/srfi/38.scm
View file

@ -197,7 +197,7 @@
(if (memv (peek-char in) delimiters) (if (memv (peek-char in) delimiters)
c c
(read-named-char c in)))) (read-named-char c in))))
(else ; last resort (else
(error "unknown # syntax: " (peek-char in))))) (error "unknown # syntax: " (peek-char in)))))
((#\() ((#\()
(read-char in) (read-char in)