Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Add more tests

ocp-get install P1 asks me a weird question
  • Loading branch information...
commit 757fe55a871cb582b542d09f5b08d2489645ce2c 1 parent 202682c
@samoht samoht authored
View
1  src/path.ml
@@ -314,7 +314,6 @@ module Path : PATH = struct
let contents f_dir f_fic f_notfound f =
let fic = s_of_filename f in
- Printf.eprintf "XXX %s: %b\n%!" fic (Sys.file_exists fic);
if Sys.file_exists fic then
(if Sys.is_directory fic then f_dir else f_fic) fic
else
View
6 tests/Makefile
@@ -13,7 +13,7 @@ PACKAGES = P1-1 P2-1 P3-1-weird.version P4-1
ARCHIVES = $(PACKAGES:%=packages/%.tar.gz)
.PHONY: all upload
-all: init upload info
+all: init upload info install
@
runserver:
@@ -31,6 +31,10 @@ upload: $(ARCHIVES) init
info: upload
$(OCPGET) info
+install:
+ $(OCPGET) install P1
+ $(OCPGET) install P2
+
packages/%.tar.gz: packages/%
cd packages && tar cz $* > $*.tar.gz
View
1  tests/packages/P1-1/P1.install
@@ -0,0 +1 @@
+lib: p1.cma p1.cmxa p1.cmi
View
1  tests/packages/P1-1/build.sh
@@ -0,0 +1 @@
+ocamlbuild p1.cma p1.cmxa
View
13 tests/packages/P1-1/p1.ml
@@ -0,0 +1,13 @@
+let x () =
+ try Random.int 10
+ with _ -> 0
+
+
+
+
+
+
+
+
+
+
View
7 tests/packages/P2-1/build.sh
@@ -0,0 +1,7 @@
+#!/bin/bash
+
+echo "Bytecode Compilation"
+ocamlopt -c -I `$(OCPGET) -dir P1` p2.ml
+
+echo "Native Compilation"
+ocamlc -c -I `$(OCPGET) -dir P1` p2.ml
View
2  tests/packages/P2-1/p2.ml
@@ -0,0 +1,2 @@
+let g () =
+ p1.x ()
Please sign in to comment.
Something went wrong with that request. Please try again.