mercury/ho_unique_error.m at 784dc26cabb5b24beb94de12a0ff6faae3536d47 - mercury - Steepath Git Private Instance

mercurylang/mercury

mirror of https://github.com/Mercury-Language/mercury.git synced 2026-04-21 04:13:46 +00:00

Files

Simon Taylor 2cf20500b5 The argument offset for higher-order calls was being set

Estimated hours taken: 0.25

compiler/unique_modes.m:
	The argument offset for higher-order calls was being set
	to 0, not 1 (the higher-order term is not included in
	the argument list). This resulted in the argument numbers
	in error messages for higher-order calls being one less
	than expected.

tests/invalid/Mmakefile:
tests/invalid/ho_unique_error.m:
tests/invalid/ho_unique_error.err_exp:
	Test case.

1999-07-14 07:15:37 +00:00

15 lines

233 B

Mathematica

Raw Blame History

 :- module ho_unique_error.
 :- interface.
 :- import_module io.
 :- pred call_ho(io__state::di, io__state::uo) is multi.
 :- implementation.
 call_ho -->
 	( call(io__write_string, "First\n")
 	; call(io__write_string, "Second\n")
 	).