Raymond Toy pushed to branch issue-156-add-two-arg-ge-le at cmucl / cmucl
Commits:
-
9ca44f6d
by Raymond Toy at 2023-03-02T10:41:16-08:00
2 changed files:
Changes:
1 | 1 | variables:
|
2 | 2 | download_url: "https://common-lisp.net/project/cmucl/downloads/snapshots/2021/07"
|
3 | 3 | version: "2021-07-x86"
|
4 | - bootstrap: "-B boot-2021-07-1 -B boot-2021-07-2"
|
|
4 | + bootstrap: "-B boot-2021-07-1 -B boot-2021-07-2 -B boot-2021-07-3"
|
|
5 | 5 | |
6 | 6 | stages:
|
7 | 7 | - install
|
1 | +;; Bootstrap file for x86 to add two-arg->= and two-arg-<= to static
|
|
2 | +;; functions list.
|
|
3 | +;;
|
|
4 | +;; Use bin/build.sh -B boot-2021-07-3 to build this (along with any
|
|
5 | +;; other bootfiles that are still needed).
|
|
6 | +(in-package :x86)
|
|
7 | +#+x86
|
|
8 | +(ext:without-package-locks
|
|
9 | + (defparameter static-functions
|
|
10 | + '(length
|
|
11 | + two-arg-+ two-arg-- two-arg-* two-arg-/ two-arg-< two-arg-> two-arg-= eql
|
|
12 | + %negate two-arg-and two-arg-ior two-arg-xor two-arg-gcd two-arg-lcm
|
|
13 | + two-arg-<= two-arg->= two-arg-/=
|
|
14 | + ))) |