Files
mercury/tests/hard_coded/rtti_strings.m
Zoltan Somogyi 33eb3028f5 Clean up the tests in half the test directories.
tests/accumulator/*.m:
tests/analysis_*/*.m:
tests/benchmarks*/*.m:
tests/debugger*/*.{m,exp,inp}:
tests/declarative_debugger*/*.{m,exp,inp}:
tests/dppd*/*.m:
tests/exceptions*/*.m:
tests/general*/*.m:
tests/grade_subdirs*/*.m:
tests/hard_coded*/*.m:
    Make these tests use four-space indentation, and ensure that
    each module is imported on its own line. (I intend to use the latter
    to figure out which subdirectories' tests can be executed in parallel.)

    These changes usually move code to different lines. For the debugger tests,
    specify the new line numbers in .inp files and expect them in .exp files.
2015-02-14 20:14:03 +11:00

32 lines
940 B
Mathematica

%---------------------------------------------------------------------------%
% vim: ts=4 sw=4 et ft=mercury
%---------------------------------------------------------------------------%
%
% The 22 March 2000 version of the compiler generated C code that contained
% strings that were not properly quoted in the RTTI structures of the type
% below, due to the backslashes in the function names.
:- module rtti_strings.
:- interface.
:- import_module io.
:- pred main(io__state::di, io__state::uo) is det.
:- implementation.
:- import_module bool.
:- type boolean_constraint
---> const(bool)
; boolean_constraint =:= boolean_constraint
; boolean_constraint /\ boolean_constraint
; boolean_constraint \/ boolean_constraint
; boolean_constraint `implies` boolean_constraint
; not(boolean_constraint).
main -->
io__write(const(no) /\ const(yes)),
io__write_string("\n").