/[cmucl]/src/code/intl-tramp.lisp
ViewVC logotype

Contents of /src/code/intl-tramp.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (show annotations)
Fri Mar 19 15:18:59 2010 UTC (4 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: GIT-CONVERSION, cross-sol-x86-base, sparc-tramp-assem-base, post-merge-intl-branch, snapshot-2010-12, snapshot-2010-11, cross-sol-x86-merged, snapshot-2011-09, snapshot-2011-06, snapshot-2011-07, snapshot-2011-04, snapshot-2011-02, snapshot-2011-03, snapshot-2011-01, snapshot-2010-06, release-20b-pre1, release-20b-pre2, cross-sparc-branch-base, snapshot-2010-05, snapshot-2010-04, snapshot-2010-07, sparc-tramp-assem-2010-07-19, snapshot-2010-08, RELEASE_20b, cross-sol-x86-2010-12-20, HEAD
Branch point for: cross-sol-x86-branch, cross-sparc-branch, sparc-tramp-assem-branch, RELEASE-20B-BRANCH
Changes since 1.1: +20 -0 lines
Merge intl-branch 2010-03-18 to HEAD.  To build, you need to use
boot-2010-02-1 as the bootstrap file.  You should probably also use
the new -P option for build.sh to generate and update the po files
while building.
1 ;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Package: INTL -*-
2 ;;;
3 ;;; **********************************************************************
4 ;;; This code was written as part of the CMU Common Lisp project at
5 ;;; Carnegie Mellon University, and has been placed in the public domain.
6 ;;;
7 (ext:file-comment "$Header: /tiger/var/lib/cvsroots/cmucl/src/code/intl-tramp.lisp,v 1.2 2010/03/19 15:18:59 rtoy Rel $")
8
9 ;;;
10 ;;; **********************************************************************
11 ;;;
12 ;;; This is a stub for building CMUCL. We need FIND-DOMAIN to be
13 ;;; defined during worldbuild. The real version will get loaded in
14 ;;; intl.lisp during worldload.
15
16 (in-package "INTL")
17
18 (defun find-domain (domain locale &optional (locale-dir *locale-directories*))
19 (declare (ignore domain locale locale-dir))
20 nil)

  ViewVC Help
Powered by ViewVC 1.1.5