~ubuntu-branches/ubuntu/intrepid/ecl/intrepid

Committer: Bazaar Package Importer
Author(s): Albin Tonnerre
Date: 2008-06-20 18:00:19 UTC
mfrom: (1.1.4 upstream)
Revision ID: james.westby@ubuntu.com-20080620180019-7fbz1ln5444vtkkr

Tags: 0.9j-20080306-2ubuntu1

* Enabled unicode support. (Closes: LP #123530)
* Modify Maintainer value to match the DebianMaintainerField specification.

files added:
ChangeLog.moved

contrib/profile

contrib/profile/profile.lisp

contrib/serve-event

contrib/serve-event/event-test.lisp

contrib/serve-event/serve-event.lisp

src/c/newhash.h

src/cmp/cmpname.lsp

src/util/tag

files removed:
ChangeLog

src/doc/benchmark.in.html

src/doc/cvs.in.html

src/doc/download.in.html

src/doc/end

src/doc/goals.in.html

src/doc/head

src/doc/index.in.html

src/doc/install.in.html

src/doc/license.in.html

files modified:
ANNOUNCEMENT

Makefile.in

contrib/asdf/asdf.lisp

contrib/defsystem/defsystem.lisp

contrib/sockets/sockets.lisp

debian/changelog

debian/control

debian/ecl-doc.doc-base

debian/rules

examples/threads/import/import.c

msvc/Makefile

msvc/c/Makefile

msvc/ecl-threads.def

msvc/ecl.def

msvc/ecl/config.h.msvc6

msvc/gc/Makefile

msvc/util/ecl_nsi.bat

src/CHANGELOG

src/Makefile.in

src/aclocal.m4

src/bare.lsp.in

src/c/all_symbols.d

src/c/alloc.d

src/c/alloc_2.d

src/c/apply.d

src/c/arch/ffi_ppc32.d

src/c/arch/ffi_x86.d

src/c/arch/ffi_x86_64.d

src/c/arch/fpe_none.c

src/c/arch/fpe_x86.c

src/c/array.d

src/c/assignment.d

src/c/backq.d

src/c/big.d

src/c/big_ll.d

src/c/cfun.d

src/c/character.d

src/c/cinit.d

src/c/cmpaux.d

src/c/compiler.d

src/c/disassembler.d

src/c/dosdummy.d

src/c/dostimes.d

src/c/dpp.c

src/c/earith.d

src/c/error.d

src/c/eval.d

src/c/ffi.d

src/c/file.d

src/c/format.d

src/c/gbc-new.d

src/c/gbc.d

src/c/gfun.d

src/c/hash.d

src/c/instance.d

src/c/interpreter.d

src/c/list.d

src/c/load.d

src/c/macros.d

src/c/main.d

src/c/mapfun.d

src/c/multival.d

src/c/num_arith.d

src/c/num_co.d

src/c/num_comp.d

src/c/num_log.d

src/c/num_pred.d

src/c/num_rand.d

src/c/num_sfun.d

src/c/number.d

src/c/package.d

src/c/pathname.d

src/c/predicate.d

src/c/print.d

src/c/read.d

src/c/reference.d

src/c/sequence.d

src/c/stacks.d

src/c/string.d

src/c/structure.d

src/c/symbol.d

src/c/symbols_list.h

src/c/symbols_list2.h

src/c/tcp.d

src/c/threads.d

src/c/threads_win32.d

src/c/time.d

src/c/typespec.d

src/c/unify.d

src/c/unixfsys.d

src/c/unixint.d

src/c/unixsys.d

src/clos/boot.lsp

src/clos/builtin.lsp

src/clos/change.lsp

src/clos/cmpinit.lsp

src/clos/combin.lsp

src/clos/conditions.lsp

src/clos/defclass.lsp

src/clos/fixup.lsp

src/clos/generic.lsp

src/clos/init.lsp

src/clos/inspect.lsp

src/clos/kernel.lsp

src/clos/macros.lsp

src/clos/method.lsp

src/clos/precomp.lsp

src/clos/print.lsp

src/clos/slot.lsp

src/clos/standard.lsp

src/clos/stdmethod.lsp

src/clos/streams.lsp

src/clos/walk.lsp

src/clx/demo/clx-demos.lisp

src/cmp/cmpbind.lsp

src/cmp/cmpblock.lsp

src/cmp/cmpcall.lsp

src/cmp/cmpcatch.lsp

src/cmp/cmpcbk.lsp

src/cmp/cmpct.lsp

src/cmp/cmpdefs.lsp

src/cmp/cmpenv.lsp

src/cmp/cmpeval.lsp

src/cmp/cmpexit.lsp

src/cmp/cmpffi.lsp

src/cmp/cmpflet.lsp

src/cmp/cmpfun.lsp

src/cmp/cmpif.lsp

src/cmp/cmpinit.lsp

src/cmp/cmpinline.lsp

src/cmp/cmplam.lsp

src/cmp/cmplet.lsp

src/cmp/cmploc.lsp

src/cmp/cmpmac.lsp

src/cmp/cmpmain.lsp

src/cmp/cmpmap.lsp

src/cmp/cmpmulti.lsp

src/cmp/cmpnum.lsp

src/cmp/cmpspecial.lsp

src/cmp/cmpstack.lsp

src/cmp/cmptag.lsp

src/cmp/cmptest.lsp

src/cmp/cmptop.lsp

src/cmp/cmptype.lsp

src/cmp/cmputil.lsp

src/cmp/cmpvar.lsp

src/cmp/cmpwt.lsp

src/cmp/load.lsp.in

src/cmp/sysfun.lsp

src/cmp/test.lsp

src/compile.lsp.in

src/config.guess

src/config.sub

src/configure

src/configure.in

src/doc/Makefile.in

src/doc/help.lsp

src/gc/config.guess

src/gc/config.sub

src/gc/darwin_stop_world.c

src/gc/include/private/gcconfig.h

src/gc/win32_threads.c

src/gmp/config.guess

src/gmp/config.sub

src/h/bytecodes.h

src/h/config.h.in

src/h/cs.h

src/h/ecl-cmp.h

src/h/ecl-inl.h

src/h/ecl.h

src/h/eval.h

src/h/external.h

src/h/internal.h

src/h/number.h

src/h/object.h

src/h/page.h

src/h/stacks.h

src/h/unify.h

src/lsp/arraylib.lsp

src/lsp/assert.lsp

src/lsp/autoload.lsp

src/lsp/cmdline.lsp

src/lsp/cmpinit.lsp

src/lsp/cmuutil.lsp

src/lsp/config.lsp.in

src/lsp/defmacro.lsp

src/lsp/defpackage.lsp

src/lsp/defstruct.lsp

src/lsp/describe.lsp

src/lsp/evalmacros.lsp

src/lsp/export.lsp

src/lsp/ffi.lsp

src/lsp/format.lsp

src/lsp/helpfile.lsp

src/lsp/init.lsp

src/lsp/iolib.lsp

src/lsp/listlib.lsp

src/lsp/loop.lsp

src/lsp/loop2.lsp

src/lsp/mislib.lsp

src/lsp/module.lsp

src/lsp/mp.lsp

src/lsp/numlib.lsp

src/lsp/packlib.lsp

src/lsp/pprint.lsp

src/lsp/predlib.lsp

src/lsp/proclaim.lsp

src/lsp/seq.lsp

src/lsp/seqlib.lsp

src/lsp/setf.lsp

src/lsp/top.lsp

src/lsp/trace.lsp

src/lsp/util.lsp

src/util/ecl-config

Show diffs side-by-side

added added

removed removed

src/cmp/cmpmulti.lsp

;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: C -*-

;;;;

(c1expr

(let ((function (gensym))

(nargs (gensym)))

`(with-stack

(let* ((,function ,(first args))

(,nargs (+ ,@(loop for i in (rest args)

collect `(stack-push-values ,i)))))

(declare (fixnum ,nargs))

(apply-from-stack ,nargs ,function))))))))

(frame (gensym)))

`(with-stack ,frame

(let* ((,function ,(first args)))

,@(loop for i in (rest args)

collect `(stack-push-values ,frame ,i))

(si::apply-from-stack-frame ,frame ,function))))))))

(defun c1multiple-value-prog1 (args)

(check-args-number 'MULTIPLE-VALUE-PROG1 args 1)

(c1expr (let ((l (gensym)))

`(with-stack

(let ((,l (stack-push-values ,(first args))))

(declare (fixnum ,l))

,@(rest args)

(stack-pop ,l))))))

(c1expr (let ((frame (gensym)))

`(with-stack ,frame

(stack-push-values ,frame ,(first args))

,@(rest args)

(stack-pop ,frame)))))

)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Older »