#include <errno.h>
#include <sys/stat.h>
-#include "../common/fname.h"
-#include "../common/xmalloc.h"
-
+/* common */
+#include "fname.h"
+#include "xmalloc.h"
+
+/* ca65 */
#include "condasm.h"
#include "error.h"
#include "global.h"
enum Token Tok = TOK_NONE; /* Current token */
-int WS; /* Flag: Whitespace before token */
+int WS; /* Flag: Whitespace before token */
long IVal; /* Integer token attribute */
char SVal [MAX_STR_LEN+1]; /* String token attribute */
#include <string.h>
-#include "../common/symdefs.h"
-#include "../common/hashstr.h"
-#include "../common/xmalloc.h"
-
+/* common */
+#include "symdefs.h"
+#include "hashstr.h"
+#include "xmalloc.h"
+
+/* ca65 */
#include "global.h"
#include "error.h"
#include "expr.h"
/* Walk throught list and write all imports to the file */
S = SymList;
while (S) {
- if ((S->Flags & SF_IMPMASK) == SF_IMPVAL) {
- if (S->Flags & SF_ZP) {
- ObjWrite8 (IMP_ZP);
- } else {
- ObjWrite8 (IMP_ABS);
- }
+ if ((S->Flags & SF_IMPMASK) == SF_IMPVAL) {
+ if (S->Flags & SF_ZP) {
+ ObjWrite8 (IMP_ZP);
+ } else {
+ ObjWrite8 (IMP_ABS);
+ }
ObjWriteStr (S->Name);
- ObjWritePos (&S->Pos);
- }
+ ObjWritePos (&S->Pos);
+ }
S = S->List;
}
-
+
/* Done writing imports */
ObjEndImports ();
}
#include <stdlib.h>
#include <string.h>
-#include "../common/exprdefs.h"
-#include "../common/hashstr.h"
-#include "../common/segdefs.h"
-#include "../common/symdefs.h"
-#include "../common/xmalloc.h"
-
+/* common */
+#include "exprdefs.h"
+#include "hashstr.h"
+#include "segdefs.h"
+#include "symdefs.h"
+#include "xmalloc.h"
+
+/* ld65 */
#include "error.h"
#include "expr.h"
#include "fileio.h"
case FRAG_SEXPR24:
case FRAG_SEXPR32:
Frag = NewFragment (Type & FRAG_TYPEMASK, Type & FRAG_BYTEMASK, Sec);
- break;
+ break;
case FRAG_FILL:
- /* Will allocate memory, but we don't care... */
- Frag = NewFragment (FRAG_FILL, Read16 (F), Sec);
- break;
+ /* Will allocate memory, but we don't care... */
+ Frag = NewFragment (FRAG_FILL, Read16 (F), Sec);
+ break;
default:
- Error ("Unknown fragment type in module `%s', segment `%s': %02X",
- O->Name, S->Name, Type);
- /* NOTREACHED */
+ Error ("Unknown fragment type in module `%s', segment `%s': %02X",
+ O->Name, S->Name, Type);
+ /* NOTREACHED */
return 0;
}