ugBASIC 1.18
An isomorphic BASIC language compiler for retrocomputers
Loading...
Searching...
No Matches
fujinet_define.c
Go to the documentation of this file.
1/*****************************************************************************
2 * ugBASIC - an isomorphic BASIC language compiler for retrocomputers *
3 *****************************************************************************
4 * Copyright 2021-2026 Marco Spedaletti (asimov@mclink.it)
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 *----------------------------------------------------------------------------
18 * Concesso in licenza secondo i termini della Licenza Apache, versione 2.0
19 * (la "Licenza"); è proibito usare questo file se non in conformità alla
20 * Licenza. Una copia della Licenza è disponibile all'indirizzo:
21 *
22 * http://www.apache.org/licenses/LICENSE-2.0
23 *
24 * Se non richiesto dalla legislazione vigente o concordato per iscritto,
25 * il software distribuito nei termini della Licenza è distribuito
26 * "COSÌ COM'È", SENZA GARANZIE O CONDIZIONI DI ALCUN TIPO, esplicite o
27 * implicite. Consultare la Licenza per il testo specifico che regola le
28 * autorizzazioni e le limitazioni previste dalla medesima.
29 ****************************************************************************/
30
31/****************************************************************************
32 * INCLUDE SECTION
33 ****************************************************************************/
34
35 #include "../../../ugbc.h"
36
37 /****************************************************************************
38 * CODE SECTION
39 ****************************************************************************/
40
41void fujinet_define( Environment * _environment, FujiNetDefine _mode ) {
42
43 switch( _mode ) {
44
45#if defined(__coco__)
46 case FN_HDBDOS:
47 deploy( serial, src_hw_coco_serial_asm);
48 cpu_call( _environment, "SERIALDEFINEHDBDOS" );
49 break;
50 case FN_BECKER:
51 deploy( serial, src_hw_coco_serial_asm);
52 cpu_call( _environment, "SERIALDEFINEBECKERPORT" );
53 break;
54#endif
55
56#if defined(__cocob__)
57 case FN_HDBDOS:
58 deploy( serial, src_hw_cocob_serial_asm);
59 cpu_call( _environment, "SERIALDEFINEHDBDOS" );
60 break;
61 case FN_BECKER:
62 deploy( serial, src_hw_cocob_serial_asm);
63 cpu_call( _environment, "SERIALDEFINEBECKERPORT" );
64 break;
65#endif
66
67#if defined(__atari__) || defined(__atarixl__)
68 case FN_SERIAL:
69 deploy( serial, src_hw_atari_serial_asm);
70 deploy( fujinet, src_hw_atari_fujinet_asm);
71 cpu_call( _environment, "FUJINETDEFINESERIAL" );
72 break;
73 case FN_SIO:
74 deploy( fujinet, src_hw_atari_fujinet_asm);
75 cpu_call( _environment, "FUJINETDEFINESIO" );
76 break;
77#endif
78
79 }
80
81}
void cpu_call(Environment *_environment, char *_label)
Definition 6309.c:3755
void fujinet_define(Environment *_environment, FujiNetDefine _mode)
@ FN_BECKER
Definition ugbc.h:375
@ FN_SIO
Definition ugbc.h:377
@ FN_HDBDOS
Definition ugbc.h:374
@ FN_SERIAL
Definition ugbc.h:376
struct _Environment Environment
Structure of compilation environment.
enum _FujiNetDefine FujiNetDefine
#define deploy(s, e)
Definition ugbc.h:4288