Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
cmucl
Project overview
Project overview
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
19
Issues
19
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
cmucl
cmucl
Commits
6167e353
Commit
6167e353
authored
Dec 08, 2018
by
Raymond Toy
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Update version numbers for 21d.
parent
3843a50c
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
77 additions
and
6 deletions
+77
-6
.gitlab-ci.yml
.gitlab-ci.yml
+5
-4
src/bootfiles/21c/boot-21d.lisp
src/bootfiles/21c/boot-21d.lisp
+68
-0
src/compiler/byte-comp.lisp
src/compiler/byte-comp.lisp
+1
-1
src/general-info/release-21d.md
src/general-info/release-21d.md
+3
-1
No files found.
.gitlab-ci.yml
View file @
6167e353
variables
:
download_url
:
"
https://common-lisp.net/project/cmucl/downloads/snapshots/2018/03"
version
:
"
2018-03-x86"
download_url
:
"
https://common-lisp.net/project/cmucl/downloads/snapshots/2018/10"
version
:
"
2018-10-x86"
bootstrap
:
"
-B
boot-21d.lisp"
linux-runner
:
image
:
ubuntu:16.04
...
...
@@ -13,7 +14,7 @@ linux-runner:
-
mkdir snapshot
-
(cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2)
script
:
-
bin/build.sh -C "" -o snapshot/bin/lisp
-
bin/build.sh
$bootstrap
-C "" -o snapshot/bin/lisp
-
bin/make-dist.sh -I dist linux-4
-
bin/run-tests.sh -l dist/bin/lisp 2>&1 | tee test.log
...
...
@@ -25,6 +26,6 @@ osx-runner:
-
mkdir snapshot
-
(cd snapshot; tar xjf ../cmucl-$version-darwin.tar.bz2)
script
:
-
bin/build.sh -C "" -o snapshot/bin/lisp
-
bin/build.sh
$bootstrap
-C "" -o snapshot/bin/lisp
-
bin/make-dist.sh -I dist darwin-4
-
bin/run-tests.sh -l dist/bin/lisp 2>&1 | tee test.log
src/bootfiles/21c/boot-21d.lisp
0 → 100644
View file @
6167e353
;;;;
;;;; Boot file for changing the fasl file version numbers to 21d.
;;;;
(
in-package
:c
)
(
setf
lisp::*enable-package-locked-errors*
nil
)
;;;
;;; Note that BYTE-FASL-FILE-VERSION is a constant.
;;;
;;; (Be sure to change BYTE-FASL-FILE-VERSION in
;;; compiler/byte-comp.lisp to the correct value too!)
;;;
#-
cmu21d
(
setf
(
symbol-value
'byte-fasl-file-version
)
#x21d
)
#-
cmu21d
(
setf
(
backend-fasl-file-version
*target-backend*
)
#x21d
)
;;;
;;; Don't check fasl versions in the compiling Lisp because we'll
;;; load files compiled with the new version numbers.
;;;
#-
cmu21d
(
setq
lisp::*skip-fasl-file-version-check*
t
)
;;;
;;; This is here because BYTE-FASL-FILE-VERSION is constant-folded in
;;; OPEN-FASL-FILE. To make the new version number take effect, we
;;; have to redefine the function.
;;;
#-
cmu21d
(
defun
open-fasl-file
(
name
where
&optional
byte-p
)
(
declare
(
type
pathname
name
))
(
let*
((
stream
(
open
name
:direction
:output
:if-exists
:new-version
:element-type
'
(
unsigned-byte
8
)
:class
'binary-text-stream
))
(
res
(
make-fasl-file
:stream
stream
)))
(
multiple-value-bind
(
version
f-vers
f-imp
)
(
if
byte-p
(
values
"Byte code"
byte-fasl-file-version
(
backend-byte-fasl-file-implementation
*backend*
))
(
values
(
backend-version
*backend*
)
(
backend-fasl-file-version
*backend*
)
(
backend-fasl-file-implementation
*backend*
)))
(
format
stream
"FASL FILE output from ~A.~@
Compiled ~A on ~A~@
Compiler ~A, Lisp ~A~@
Targeted for ~A, FASL version ~X~%"
where
(
ext:format-universal-time
nil
(
get-universal-time
))
(
machine-instance
)
compiler-version
(
lisp-implementation-version
)
version
f-vers
)
;;
;; Terminate header.
(
dump-byte
255
res
)
;;
;; Specify code format.
(
dump-fop
'lisp::fop-long-code-format
res
)
(
dump-byte
f-imp
res
)
(
dump-unsigned-32
f-vers
res
))
res
))
src/compiler/byte-comp.lisp
View file @
6167e353
...
...
@@ -38,7 +38,7 @@
;; 0-9 followed by a single hex digit in the range a-f. Then the
;; version looks like a decimal number followed by a minor release
;; letter of a to f.
(
defconstant
byte-fasl-file-version
#x21
c
)
(
defconstant
byte-fasl-file-version
#x21
d
)
(
let*
((
version-string
(
format
nil
"~X"
byte-fasl-file-version
)))
;; Add :cmu<n> to *features*
...
...
src/general-info/release-21d.md
View file @
6167e353
** Work in Progress **
# CMUCL 21d
The CMUCL project is pleased to announce the release of CMUCL 21c.
...
...
@@ -31,6 +30,8 @@ public domain.
*
ANSI compliance fixes:
*
Bug fixes:
*
Gitlab tickets:
*
~~#48~~ Update RNG from MT19937 to xoroshiro128+
*
~~#45~~ Handling of relative paths in
`EXT:RUN-PROGRAM`
*
~~#50~~ CLX (Hemlock) fails to run.
*
~~#49~~ CLM crashes
*
~~#47~~ Backquate and multiple splices
...
...
@@ -40,6 +41,7 @@ public domain.
*
~~#61~~ Segfault when compiling call to
`ARRAY-HAS-FILL-POINTER-P`
on bit vector constant
*
~~#62~~ Segfault when compiling
`ARRAY-DISPLACEMENT`
on a string constant
*
~~#69~~ GC assertions compiled in and allow user to enable them.
*
~~#71~~ More info for
`MACHINE-TYPE`
and
`MACHINE-VERSION`
for x86
*
Other changes:
*
Improvements to the PCL implementation of CLOS:
*
Changes to building procedure:
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment