Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Open sidebar
Ben Avison
defmod
Commits
85eda648
Commit
85eda648
authored
Apr 18, 2000
by
Stewart Brodie
Browse files
Import of changes for defmod 6.01 from OSLib.
Admin: Tested against ToolAction. Version 6.01. Tagged as 'defmod-6_01'
parent
f4b50277
Changes
12
Hide whitespace changes
Inline
Side-by-side
Showing
12 changed files
with
330 additions
and
224 deletions
+330
-224
Makefile
Makefile
+4
-1
VersionNum
VersionNum
+9
-9
sources/c/asmhelp
sources/c/asmhelp
+3
-2
sources/c/cheader
sources/c/cheader
+69
-31
sources/c/chelp
sources/c/chelp
+3
-2
sources/c/cstrong
sources/c/cstrong
+22
-54
sources/c/def
sources/c/def
+4
-4
sources/c/hdr
sources/c/hdr
+8
-5
sources/c/objasm
sources/c/objasm
+83
-44
sources/h/def
sources/h/def
+5
-4
sources/h/objasm
sources/h/objasm
+1
-1
sources/y/defmod
sources/y/defmod
+119
-67
No files found.
Makefile
View file @
85eda648
...
...
@@ -82,7 +82,10 @@ LIBS=${CLIB}
.SUFFIXES
:
.o .c .y .s
.c.o
:
; ${CC} ${CCFLAGS} -o $@ $<
.s.o
:
; ${AS} ${ASFLAGS} -o $@ $<
.y.c
:
; ${YACC} ${YACCFLAGS} -o $@ $<
c.defmod
:
sources.y.defmod
${YACC}
${YACCFLAGS}
-o
$@
sources.y.defmod
o.defmod
:
c.defmod
${CC}
${CCFLAGS}
${YACCDEFS}
-o
$@
c.defmod
...
...
VersionNum
View file @
85eda648
/* (
5.50
)
/* (
6.01
)
*
* This file is automatically maintained by srccommit, do not edit manually.
*
*/
#define Module_MajorVersion_CMHG
5.50
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG
18 Nov 1999
#define Module_MajorVersion_CMHG
6.01
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG
18 Apr 2000
#define Module_MajorVersion
"5.50
"
#define Module_Version
550
#define Module_MinorVersion
""
#define Module_Date
"29 Nov 1999
"
#define Module_MajorVersion
"6.01
"
#define Module_Version
601
#define Module_MinorVersion
""
#define Module_Date
"18 Apr 2000
"
#define Module_FullVersion "
5.50
"
#define Module_FullVersion "
6.01
"
sources/c/asmhelp
View file @
85eda648
/*asmhelp.c - output a help file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -23,6 +23,7 @@
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <kernel.h>
/* TV 980115 */
#include "os.h"
...
...
@@ -120,6 +121,6 @@ os_error *asmhelp_output
}
}
finish:
if
(
rc
<
0
)
error
=
_kernel_last_oserror
();
if
(
rc
<
0
)
error
=
(
os_error
*
)
_kernel_last_oserror
();
/* TV 980115 */
return
error
;
}
sources/c/cheader
View file @
85eda648
/*cheader.c - output a cheader file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -24,6 +24,7 @@
#include <stdio.h>
#include <string.h>
#include <time.h>
#include <kernel.h>
/* TV 980115 */
#include "macros.h"
#include "os.h"
...
...
@@ -35,10 +36,10 @@
static
int
strsplen
(
const
char
*
s
char
*
s
)
{
const
char
*
p
=
s
;
char
*
p
=
s
;
while
(
*
p
!=
'\0'
&&
*
p
!=
' '
)
p
++
;
...
...
@@ -204,6 +205,14 @@ static int Print_Decl
)
goto
finish
;
if
(
t
->
tag
==
def_TYPE_STRUCT
&&
t
->
data
AS
list
.
base
)
{
char
base
[
def_ID_LIMIT
+
1
];
def_as_macro
(
base
,
t
->
data
AS
list
.
base
->
data
AS
id
);
if
((
rc
=
fprintf
(
file
,
"%s_MEMBERS%s
\n
%*s "
,
base
,
var
?
"
\\
"
:
""
,
3
*
(
nest
+
1
),
""
))
<
0
)
goto
finish
;
}
for
(
i
=
0
;
i
<
t
->
data
AS
list
.
count
;
i
++
)
{
if
(
i
==
t
->
data
AS
list
.
count
-
1
&&
...
...
@@ -725,9 +734,46 @@ os_error *cheader_output
}
}
if
((
rc
=
Print_Decl
(
file
,
t
,
c_name
,
NULL
,
FALSE
,
0
))
<
0
)
goto
finish
;
if
(
t
->
tag
==
def_TYPE_STRUCT
&&
t
->
data
AS
list
.
ellipsis
&&
t
->
data
AS
list
.
count
>
1
)
{
char
macro_name
[
def_ID_LIMIT
+
1
];
int
i
;
def_as_macro
(
macro_name
,
type
);
if
((
rc
=
fprintf
(
file
,
"#define %s_MEMBERS"
,
macro_name
))
<
0
)
goto
finish
;
if
(
t
->
data
AS
list
.
base
)
{
char
base
[
def_ID_LIMIT
+
1
];
def_as_macro
(
base
,
t
->
data
AS
list
.
base
->
data
AS
id
);
if
((
rc
=
fprintf
(
file
,
"
\\\n
%s_MEMBERS"
,
base
))
<
0
)
goto
finish
;
}
for
(
i
=
0
;
i
<
t
->
data
AS
list
.
count
-
1
;
i
++
)
{
if
((
rc
=
fprintf
(
file
,
"
\\\n
"
))
<
0
)
goto
finish
;
if
((
rc
=
Print_Decl
(
file
,
t
->
data
AS
list
.
members
[
i
],
NULL
,
t
->
data
AS
list
.
members
[
i
]
->
name
,
TRUE
,
0
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
";"
))
<
0
)
goto
finish
;
}
if
((
rc
=
fprintf
(
file
,
"
\n\n
struct %s
\n
{ %s_MEMBERS
\n
"
,
c_name
,
macro_name
))
<
0
)
goto
finish
;
if
((
rc
=
Print_Decl
(
file
,
t
->
data
AS
list
.
members
[
i
],
NULL
,
t
->
data
AS
list
.
members
[
i
]
->
name
,
TRUE
,
0
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
" [UNKNOWN];
\n
}"
))
<
0
)
goto
finish
;
}
else
if
((
rc
=
Print_Decl
(
file
,
t
,
c_name
,
NULL
,
FALSE
,
0
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
";
\n\n
"
))
<
0
)
goto
finish
;
...
...
@@ -738,39 +784,46 @@ os_error *cheader_output
t
->
data
AS
list
.
members
[
t
->
data
AS
list
.
count
-
1
]
->
value
!=
def_VALUE_VARIABLE
)
{
int
i
;
char
macro_name
[
def_ID_LIMIT
+
1
];
int
i
=
t
->
data
AS
list
.
count
-
1
;
char
*
suffix
;
def_as_macro
(
c
_name
,
type
);
def_as_macro
(
macro
_name
,
type
);
if
((
rc
=
fprintf
(
file
,
"#define %s(N)
\\\n
"
,
c
_name
))
<
0
)
macro
_name
))
<
0
)
goto
finish
;
if
((
rc
=
Print_Decl
(
file
,
t
,
NULL
,
NULL
,
TRUE
,
1
))
<
0
)
if
((
rc
=
fprintf
(
file
,
"struct
\\\n
{ "
))
<
0
)
goto
finish
;
if
(
t
->
data
AS
list
.
count
>
1
)
if
((
rc
=
fprintf
(
file
,
"%s_MEMBERS
\\\n
"
,
macro_name
))
<
0
)
goto
finish
;
if
((
rc
=
Print_Decl
(
file
,
t
->
data
AS
list
.
members
[
i
],
NULL
,
t
->
data
AS
list
.
members
[
i
]
->
name
,
TRUE
,
0
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
" [N];
\\\n
}"
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
"
\n\n
"
))
<
0
)
goto
finish
;
/*Also emit a macro to calculate the size of such a type.*/
if
((
suffix
=
strchr
(
c
_name
,
'_'
))
!=
NULL
)
if
((
suffix
=
strchr
(
macro
_name
,
'_'
))
!=
NULL
)
{
if
((
rc
=
fprintf
(
file
,
"#define %.*s_SIZEOF%s(N)
\\\n
("
,
suffix
-
c
_name
,
c
_name
,
suffix
))
<
0
)
suffix
-
macro
_name
,
macro
_name
,
suffix
))
<
0
)
goto
finish
;
}
else
{
if
((
rc
=
fprintf
(
file
,
"#define %s_SIZEOF(N) ("
,
c
_name
))
<
0
)
macro
_name
))
<
0
)
goto
finish
;
}
/*We need the extern form for the rest.*/
def_as_extern
(
c_name
,
type
);
/*This calculates an offset (using |offsetof|).*/
if
((
i
=
t
->
data
AS
list
.
count
)
>
1
)
{
...
...
@@ -876,23 +929,13 @@ os_error *cheader_output
break
;
case
def_TYPE_BITS
:
#if 1
/* RS Thursday, 1st April 1999 */
if
((
rc
=
fprintf
(
file
,
"0x%X"
,
c
->
value
))
<
0
)
goto
finish
;
#else
/* JRC -- originally... */
if
((
rc
=
fprintf
(
file
,
"0x%Xu"
,
c
->
value
))
<
0
)
goto
finish
;
#endif
break
;
case
def_TYPE_BYTES
:
#if 1
/* RS Thursday, 1st April 1999 */
if
((
rc
=
fprintf
(
file
,
"((bytes) 0x%X)"
,
c
->
value
))
<
0
)
goto
finish
;
#else
/* JRC -- originally... */
if
((
rc
=
fprintf
(
file
,
"((bytes) 0x%Xu)"
,
c
->
value
))
<
0
)
goto
finish
;
#endif
break
;
case
def_TYPE_BOOL
:
...
...
@@ -908,13 +951,8 @@ os_error *cheader_output
0
))
<
0
)
goto
finish
;
#if 1
/* RS Thursday, 1st April 1999 */
if
((
rc
=
fprintf
(
file
,
") 0x%x)"
,
c
->
value
))
<
0
)
/*was %d in either case 19th Apr 1995*/
#else
/* JRC -- originally... */
if
((
rc
=
fprintf
(
file
,
") 0x%Xu)"
,
c
->
value
))
<
0
)
/*was %d in either case 19th Apr 1995*/
#endif
goto
finish
;
break
;
}
...
...
@@ -1551,6 +1589,6 @@ os_error *cheader_output
goto
finish
;
finish:
if
(
rc
<
0
)
error
=
_kernel_last_oserror
();
if
(
rc
<
0
)
error
=
(
os_error
*
)
_kernel_last_oserror
();
/* TV 980115 */
return
error
;
}
sources/c/chelp
View file @
85eda648
/*chelp.c - output an help file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -23,6 +23,7 @@
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <kernel.h>
/* TV 980115 */
#include "macros.h"
#include "os.h"
...
...
@@ -586,6 +587,6 @@ os_error *chelp_output
}
finish:
if
(
rc
<
0
)
error
=
_kernel_last_oserror
();
if
(
rc
<
0
)
error
=
(
os_error
*
)
_kernel_last_oserror
();
/* TV 980115 */
return
error
;
}
sources/c/cstrong
View file @
85eda648
/*cstrong.c - output an help file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -25,6 +25,7 @@
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <kernel.h>
/* TV 990127 */
/*From OSLib*/
#include "macros.h"
...
...
@@ -40,9 +41,7 @@
#include "def.h"
#include "cstrong.h"
/*
#define TRUNCATION_LIMIT 19
*/
typedef
struct
cstrong_entry
...
...
@@ -244,6 +243,17 @@ static int Print_Decl
)
goto
finish
;
if
(
t
->
tag
==
def_TYPE_STRUCT
&&
t
->
data
AS
list
.
base
)
{
char
base
[
def_ID_LIMIT
+
1
];
def_as_macro
(
base
,
t
->
data
AS
list
.
base
->
data
AS
id
);
if
((
rc
=
fprintf
(
file
,
"%s_MEMBERS
\n
%*s "
,
base
,
21
+
3
*
nest
,
" "
))
<
0
)
goto
finish
;
}
for
(
i
=
0
;
i
<
t
->
data
AS
list
.
count
;
i
++
)
{
if
(
i
==
t
->
data
AS
list
.
count
-
1
&&
...
...
@@ -411,47 +421,24 @@ os_error *cstrong_output
if
(
t
==
NULL
||
t
->
tag
==
def_TYPE_ABSTRACT
)
{
#ifdef TRUNCATION_LIMIT
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s>.h
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s
.$
>.h
\n
"
"Declaration: typedef struct {...} *%s;"
,
c_name
,
c_title
,
c_title
,
c_name
))
<
0
)
goto
finish
;
#else
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s>.h
\n
"
"Declaration: typedef struct {...} *%s;"
,
c_name
,
c_title
,
c_name
))
<
0
)
goto
finish
;
#endif
}
else
{
#ifdef TRUNCATION_LIMIT
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s>.h
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s
.$
>.h
\n
"
"Declaration: typedef%s"
,
c_name
,
c_title
,
c_title
,
t
->
tag
==
def_TYPE_STRUCT
||
t
->
tag
==
def_TYPE_UNION
?
"
\n
"
:
" "
))
<
0
)
goto
finish
;
#else
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s>.h
\n
"
"Declaration: typedef%s"
,
c_name
,
c_title
,
t
->
tag
==
def_TYPE_STRUCT
||
t
->
tag
==
def_TYPE_UNION
?
"
\n
"
:
" "
))
<
0
)
goto
finish
;
#endif
if
((
rc
=
Print_Decl
(
c_title
,
help_data
,
t
,
NULL
,
c_name
,
FALSE
,
0
))
<
0
)
...
...
@@ -536,25 +523,14 @@ os_error *cstrong_output
def_as_macro
(
c_name
,
cnst
);
#ifdef TRUNCATION_LIMIT
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s>.h
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s
.$
>.h
\n
"
"Declaration: #define %s "
,
c_name
,
c_title
,
c_title
,
c_name
))
<
0
)
goto
finish
;
#else
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s>.h
\n
"
"Declaration: #define %s "
,
c_name
,
c_title
,
c_name
))
<
0
)
goto
finish
;
#endif
switch
(
c
->
type
->
tag
)
{
...
...
@@ -670,22 +646,12 @@ os_error *cstrong_output
first
=
TRUE
;
#ifdef TRUNCATION_LIMIT
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s>.h
\n
"
"Defined in: <%s=>%."
STR
(
TRUNCATION_LIMIT
)
"s
.$
>.h
\n
"
"Declaration: extern "
,
c_name
,
c_title
,
c_title
))
<
0
)
goto
finish
;
#else
if
((
rc
=
fprintf
(
help_data
,
"%s
\n
"
"Defined in: <%s>.h
\n
"
"Declaration: extern "
,
c_name
,
c_title
))
<
0
)
goto
finish
;
#endif
if
(
!
nonx
)
{
...
...
@@ -968,13 +934,15 @@ os_error *cstrong_output
goto
finish
;
finish:
if
(
help_data
!=
NULL
&&
fclose
(
help_data
)
!=
0
)
rc
=
-
1
;
if
(
help_data
!=
NULL
)
fclose
(
help_data
);
if
(
index
!=
NULL
&&
fclose
(
index
)
!=
0
)
rc
=
-
1
;
if
(
index
!=
NULL
)
fclose
(
index
);
for
(
i
=
0
;
i
<
Entry_Count
;
i
++
)
free
(
Strings
[
i
]);
if
(
rc
<
0
)
error
=
_kernel_last_oserror
();
if
(
rc
<
0
)
error
=
(
os_error
*
)
_kernel_last_oserror
();
/* TV 990127 */
return
error
;
}
sources/c/def
View file @
85eda648
/*def.c - support routines*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -56,7 +56,7 @@ typedef struct String {char s [def_ID_LIMIT + 1];} String;
void
def_as_extern
(
char
*
s0
,
const
char
*
s1
char
*
s1
)
{
enum
{
MODULE
,
NAME
}
state
=
MODULE
;
...
...
@@ -106,7 +106,7 @@ void def_as_extern
void
def_as_macro
(
char
*
s0
,
const
char
*
s1
char
*
s1
)
{
enum
{
MODULE
,
NAME
}
state
=
MODULE
;
...
...
@@ -239,7 +239,7 @@ static String Name_Code
void
def_as_c_plus_plus
(
char
*
c_plus_plus_name
,
const
char
*
swi_name
,
char
*
swi_name
,
def_s
s
)
{
...
...
sources/c/hdr
View file @
85eda648
/*hdr.c - output an assembler header file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -24,6 +24,7 @@
#include <stdio.h>
#include <string.h>
#include <time.h>
#include "kernel.h"
/* TV 980115 */
#include "macros.h"
#include "os.h"
...
...
@@ -40,7 +41,7 @@
#define UNLABELLED_INST_COL 1
#define UNLABELLED_ARG_COL 2
static
const
char
*
Op
[]
=
{
":OR:"
,
":AND:"
,
"+"
,
":EOR:"
};
static
char
*
Op
[]
=
{
":OR:"
,
":AND:"
,
"+"
,
":EOR:"
};
static
int
Emit
(
...
...
@@ -436,7 +437,11 @@ static int Emit_Get (FILE *file, char *name)
if
((
rc
=
Emit
(
file
,
NULL
,
"]"
))
<
0
)
goto
finish
;
#if 0 // Amended to reflect change of include path name *** TV 20000305 ***
if ((rc = sprintf (s, "\"GET OS:Hdr.%s\"", name)) < 0)
#else
if
((
rc
=
sprintf
(
s
,
"
\"
GET OSLibInclude:Hdr.%s
\"
"
,
name
))
<
0
)
#endif
goto
finish
;
if
((
rc
=
EmitSS
(
file
,
NULL
,
"["
,
":LNOT: :DEF: "
,
hdr
))
<
0
)
...
...
@@ -763,12 +768,10 @@ os_error *hdr_output
if
((
rc
=
Emit
(
file
,
NULL
,
"]"
))
<
0
)
goto
finish
;
if
((
rc
=
fprintf
(
file
,
"
\n
"
))
<
0
)
goto
finish
;
if
((
rc
=
Emit
(
file
,
NULL
,
"END"
))
<
0
)
goto
finish
;
finish:
if
(
rc
<
0
)
error
=
_kernel_last_oserror
();
if
(
rc
<
0
)
error
=
(
os_error
*
)
_kernel_last_oserror
();
/* TV 980115 */
return
error
;
}
sources/c/objasm
View file @
85eda648
/*objasm.c - output an objasm file given a module defn*/
/*OSLib---efficient, type-safe, transparent, extensible,
/*OSLib---efficient, type-safe, transparent, extensible,
\n"
register-safe A P I coverage of RISC O S*/
/*Copyright 1994 Jonathan Coxhead*/
...
...
@@ -42,11 +42,11 @@
#include "main.h"
#include "objasm.h"
/*
#define MEM_FOR_OBJASM (1024*1024)
*/
#define MEM_FOR_OBJASM (1024*1024)
static
const
char
*
Local
;
static
char
*
Local
;
static
const
char
static
char
*
APCS_Names
[]
=
/*names of registers as seen by A P C S*/
{
/*arguments*/
...
...
@@ -69,7 +69,7 @@ static const char
};
/*-----------------------------------------------------------------------*/
static
const
char
*
Op
static
char
*
Op
(
def_op
op
)
...
...
@@ -163,8 +163,8 @@ static bool Byte_Wide
static
int
Emit_Header
(
FILE
*
file
,
const
char
*
title
,
const
char
*
author
char
*
title
,
char
*
author
)
{
time_t
now
;
...
...
@@ -219,7 +219,7 @@ static int Emit_Header
static
int
Emit0
(
FILE
*
file
,
const
char
*
s0
char
*
s0
)
{
int
rc
=
0
;
...
...
@@ -233,8 +233,8 @@ static int Emit0
static
int
Emit1
(
FILE
*
file
,
const
char
*
s0
,
const
char
*
s1
char
*
s0
,
char
*
s1
)
{
int
rc
=
0
;
...
...
@@ -249,9 +249,9 @@ static int Emit1
static
int
Emit2
(
FILE
*
file
,
const
char
*
s0
,
const
char
*
s1
,
const
char
*
s2
char
*
s0
,
char
*
s1
,
char
*
s2
)
{
int
rc
=
0
;
...
...
@@ -266,10 +266,10 @@ static int Emit2
static
int
Emit3
(
FILE
*
file
,
const
char
*
s0
,
const
char
*
s1
,
const
char
*
s2
,
const
char
*
s3
char
*
s0
,
char
*
s1
,
char
*
s2
,
char
*
s3
)
{
int
rc
=
0
;
...
...
@@ -284,7 +284,7 @@ static int Emit3
static
int
Emit_Label
(
FILE
*
file
,
const
char
*
s0
char
*
s0
)
{
return
fprintf
(
file
,
"%s ROUT
\n
"
,
s0
);
...
...
@@ -294,7 +294,7 @@ static int Emit_Label
static
int
Emit_Local
(
FILE
*
file
,
const
char
*
s0
char
*
s0
)
{
file
=
file
;
...
...
@@ -374,11 +374,11 @@ static int Format_SWI_List
static
int
Emit_Code
(
FILE
*
file
,
const
char
*
swi
,
char
*
swi
,
def_s
s
,
bool
nonx
,
l
oo
kup_t
types
,
b
oo
l
apcs32
b
oo
l
apcs32
,
l
oo
kup_t
types