2016-12-28 20:32:00 +00:00
|
|
|
// ACME - a crossassembler for producing 6502/65c02/65816/65ce02 code.
|
|
|
|
|
// Copyright (C) 1998-2016 Marco Baye
|
2012-02-27 21:14:46 +00:00
|
|
|
// Have a look at "acme.c" for further info
|
|
|
|
|
//
|
|
|
|
|
// Platform specific stuff (in this case, for DOS, OS/2 and Windows)
|
|
|
|
|
#ifndef platform_C
|
|
|
|
|
#define platform_C
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
#include "dynabuf.h"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// variables
|
|
|
|
|
char *DOS_lib_prefix = NULL; // header string of library tree
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// used as PLATFORM_INIT: reads "ACME" environment variable
|
|
|
|
|
void DOS_entry(void)
|
|
|
|
|
{
|
|
|
|
|
char *env_var;
|
|
|
|
|
|
|
|
|
|
// Find out the path of ACME's library
|
|
|
|
|
env_var = getenv("ACME");
|
|
|
|
|
// if environment variable was found, make a copy
|
|
|
|
|
if (env_var) {
|
|
|
|
|
DYNABUF_CLEAR(GlobalDynaBuf);
|
|
|
|
|
// copy environment variable to global dynamic buffer
|
|
|
|
|
DynaBuf_add_string(GlobalDynaBuf, env_var);
|
|
|
|
|
DynaBuf_append(GlobalDynaBuf, '\\'); // add dir separator
|
|
|
|
|
DynaBuf_append(GlobalDynaBuf, '\0'); // add terminator
|
|
|
|
|
DOS_lib_prefix = DynaBuf_get_copy(GlobalDynaBuf);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// convert UNIX-style pathname character to DOS-style pathname character
|
|
|
|
|
char DOS_convert_path_char(char byte)
|
|
|
|
|
{
|
|
|
|
|
if (byte == '/')
|
|
|
|
|
return '\\';
|
|
|
|
|
if (byte == '\\')
|
|
|
|
|
return '/';
|
|
|
|
|
return byte;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#endif
|
