mirror of
https://github.com/Mercury-Language/mercury.git
synced 2025-12-11 20:03:28 +00:00
455e1eea75
Estimated hours taken: 2 Branches: main The runtime had two different conventions for naming types. One convention, used mostly in the debugger-related modules, added underscores between capitalized words; example: MR_Label_Layout. The other convention, used in most modules, used capitalized words without underscores (e.g. MR_TypeInfo). This diff standardizes on the second convention. It has no algorithmic changes, only renames of types. runtime/*.[ch]: trace/*.[ch]: compiler/*.m: library/*.m: mdbcomp/*.m: Effect the change described above. The only substantive change is that runtime/mercury_stack_layout.h used to define *two* types for trace levels: MR_TraceLevel and MR_Trace_Level, and this diff standardizes on just one (they had equivalent definitions). runtime/mercury_bootstrap.h: Add a #define from the old name to the new for all the changed type names that the installed compiler can put into .c files. We can delete these #defines some time after this diff has bootstrapped. slice/.mgnuc_opts: Restore the --no-mercury-stdlib-dir option, without which the slice directory won't compile after this change (because it looks for type names in the installed runtime header files, which define the old versions of type names).
98 lines
3.3 KiB
C
98 lines
3.3 KiB
C
/*
|
|
** vim: ts=4 sw=4 expandtab
|
|
*/
|
|
/*
|
|
** Copyright (C) 2001, 2006 The University of Melbourne.
|
|
** This file may only be copied under the terms of the GNU Library General
|
|
** Public License - see the file COPYING.LIB in the Mercury distribution.
|
|
*/
|
|
|
|
/*
|
|
** mercury_trace_source.h
|
|
**
|
|
** This file provides routines to open and use a window to display the source
|
|
** code. Using these requires an X server and a version of vim compiled with
|
|
** '+clientserver'. If these are not available an error is returned.
|
|
**
|
|
** Main author: Mark Brown
|
|
*/
|
|
|
|
#ifndef MERCURY_TRACE_SOURCE_H
|
|
#define MERCURY_TRACE_SOURCE_H
|
|
|
|
#include "mercury_std.h" /* for MR_bool */
|
|
|
|
/*
|
|
** This holds the information for one server that the program is
|
|
** attached to. The fields are:
|
|
**
|
|
** server_name Name of the source server, or NULL if there is no server.
|
|
**
|
|
** server_cmd Command to run to start the server, or connect to it,
|
|
** or NULL if to use the default of "vim".
|
|
**
|
|
** split Is the server in split screen mode? If so, we show both
|
|
** the parent and current contexts.
|
|
*/
|
|
typedef struct {
|
|
char *server_name;
|
|
char *server_cmd;
|
|
MR_bool split;
|
|
} MR_TraceSourceServer;
|
|
|
|
/*
|
|
** Start a server in a new window. The arguments are:
|
|
**
|
|
** source_server Info for the new server. If server_name is NULL, a new
|
|
** name is generated. If the operation succeeds, memory
|
|
** for the name will be MR_malloc'd so the caller must
|
|
** MR_free it when no longer needed.
|
|
**
|
|
** window_cmd Command to open a new window; NULL means default to
|
|
** "xterm -e".
|
|
**
|
|
** timeout Maximum time to wait for the server to start, in seconds.
|
|
** XXX Don't rely on the times being accurate.
|
|
**
|
|
** verbose If MR_TRUE, print out system calls before executing them
|
|
** and show their output. If MR_FALSE the output is redirected
|
|
** to /dev/null.
|
|
**
|
|
** If successful, the function returns NULL, otherwise it returns a string
|
|
** describing the problem.
|
|
*/
|
|
|
|
const char *MR_trace_source_open_server(MR_TraceSourceServer *server,
|
|
const char *window_cmd, int timeout, MR_bool verbose);
|
|
|
|
/*
|
|
** Attach to an already running server. If successful it returns NULL,
|
|
** otherwise it returns a string describing the problem.
|
|
*/
|
|
|
|
const char *MR_trace_source_attach(MR_TraceSourceServer *server,
|
|
int timeout, MR_bool verbose);
|
|
|
|
/*
|
|
** Synchronise the server with the current source location. This first checks
|
|
** if the server is running (since the user could have exited from the server
|
|
** window manually). If there is no such server, returns a warning message
|
|
** and does nothing else; returns NULL if there were no problems.
|
|
*/
|
|
|
|
const char *MR_trace_source_sync(MR_TraceSourceServer *server,
|
|
const char *filename, int lineno, const char *parent_filename,
|
|
int parent_lineno, MR_bool verbose);
|
|
|
|
/*
|
|
** Close a server if possible. If the server appears to be still running
|
|
** after this, returns a warning message. This can happen if the user has
|
|
** modified the code in the source window, for example.
|
|
*/
|
|
|
|
const char *MR_trace_source_close(MR_TraceSourceServer *server,
|
|
MR_bool verbose);
|
|
|
|
#endif /* not MERCURY_TRACE_SOURCE_H */
|
|
|