Skip to content

Commit

Permalink
Merge pull request #40 from SoftwareFoundationGroupAtKyotoU/fix_SMT_o…
Browse files Browse the repository at this point in the history
…utput

Follow the format change of SMT solvers.
  • Loading branch information
aigarashi authored Sep 15, 2021
2 parents 327decc + ba49cd0 commit 1c4f014
Show file tree
Hide file tree
Showing 3 changed files with 20 additions and 8 deletions.
16 changes: 9 additions & 7 deletions .travis-ci.sh
Original file line number Diff line number Diff line change
Expand Up @@ -2,14 +2,16 @@

set -ev

opam init --yes --no-setup --comp 4.08.0
eval $(opam config env)
opam install --yes menhir ppx_sexp_conv sexplib dune ppx_let ppx_custom_printf yaml
# opam init --yes --no-setup --comp 4.08.0
# eval $(opam config env)
# opam install --yes menhir ppx_sexp_conv sexplib dune ppx_let ppx_custom_printf yaml z3

mkdir -p ~/.local/bin
export PATH=$HOME/.local/bin:$PATH
curl -L https://github.com/Z3Prover/z3/releases/download/z3-4.8.4/z3-4.8.4.d6df51951f4c-x64-ubuntu-14.04.zip > z3.zip
unzip -o -j z3.zip z3-4.8.4.d6df51951f4c-x64-ubuntu-14.04/bin/z3 -d ~/.local/bin
# mkdir -p ~/.local/bin
# export PATH=$HOME/.local/bin:$PATH
# curl -L https://github.com/Z3Prover/z3/releases/download/z3-4.8.12/z3-solver-4.8.12.0.tar.gz > z3.tar.gz
# unzip -o -j z3.zip z3-4.8.12-x64-glibc-2.31/bin/z3 -d ~/.local/bin

z3 -version

# approximately the memory available on travis
make -C ./src test.exe genFlags.exe stdlib/lin.intr
Expand Down
10 changes: 10 additions & 0 deletions .travis.yml
Original file line number Diff line number Diff line change
@@ -1,3 +1,4 @@
dist: bionic
language: c
addons:
apt:
Expand All @@ -15,4 +16,13 @@ cache:
directories:
- $HOME/.opam
- $HOME/jdk8

before_install:
- opam init --yes --no-setup --comp 4.08.0
- eval $(opam env)

install:
- opam install --yes menhir ppx_sexp_conv sexplib dune ppx_let ppx_custom_printf yaml
- travis_wait 30 opam install --yes z3

script: bash -ex .travis-ci.sh
2 changes: 1 addition & 1 deletion src/ownershipSolver.ml
Original file line number Diff line number Diff line change
Expand Up @@ -170,7 +170,7 @@ let solve_ownership ~opts result =
let open Sexplib.Sexp in
let s = scan_sexp @@ Lexing.from_string m in
match s with
| List (Atom "model"::model) ->
| List (Atom "model" :: model) | List model ->
let model_assoc = extract_assoc model [] in
let o_sigma = List.fold_left (fun acc (nm,ty,body) ->
match ty,body with
Expand Down

0 comments on commit 1c4f014

Please sign in to comment.