Skip to content

Commit

Permalink
Update the feature identifier r5rs to r7rs
Browse files Browse the repository at this point in the history
Signed-off-by: yamacir-kit <[email protected]>
  • Loading branch information
yamacir-kit committed Oct 1, 2023
1 parent b915f17 commit 2076b24
Show file tree
Hide file tree
Showing 4 changed files with 9 additions and 9 deletions.
6 changes: 3 additions & 3 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -99,7 +99,7 @@ Procedures for each standard are provided by the following R7RS-style libraries:
cmake -B build -DCMAKE_BUILD_TYPE=Release
cd build
make package
sudo apt install build/meevax_0.4.825_amd64.deb
sudo apt install build/meevax_0.4.826_amd64.deb
```

or
Expand Down Expand Up @@ -131,9 +131,9 @@ sudo rm -rf /usr/local/share/meevax

| Target Name | Description
|-------------|-------------
| `all` | Build shared-library `libmeevax.0.4.825.so` and executable `meevax`
| `all` | Build shared-library `libmeevax.0.4.826.so` and executable `meevax`
| `test` | Test executable `meevax`
| `package` | Generate debian package `meevax_0.4.825_amd64.deb`
| `package` | Generate debian package `meevax_0.4.826_amd64.deb`
| `install` | Copy files into `/usr/local` directly

## Usage
Expand Down
2 changes: 1 addition & 1 deletion VERSION
Original file line number Diff line number Diff line change
@@ -1 +1 @@
0.4.825
0.4.826
2 changes: 1 addition & 1 deletion configure/version.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ inline namespace kernel
auto features() -> object const&
{
let static const features = list(
make_symbol("r5rs"),
make_symbol("r7rs"),
make_symbol("exact-closed"),
make_symbol("exact-complex"),
make_symbol("ieee-float"),
Expand Down
8 changes: 4 additions & 4 deletions test/srfi-0.ss
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@
(r6rs 'r6rs)
(r7rs 'r7rs)
(else 'unknown))
=> 'r5rs)
=> 'r7rs)

(check (cond-expand
((library (scheme base)) 'supported)
Expand All @@ -26,9 +26,9 @@
=> 'standard)

(check (cond-expand
((not r5rs) 'not-r5rs)
(else 'r5rs))
=> 'r5rs)
((not r7rs) 'not-r7rs)
(else 'r7rs))
=> 'r7rs)

(check (cond-expand
((and (library (scheme base))
Expand Down

0 comments on commit 2076b24

Please sign in to comment.