Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion MacroVBCC68k.pl
Original file line number Diff line number Diff line change
Expand Up @@ -90,7 +90,7 @@ BEGIN
$reg =~ s/-/\//g;

# check for some possible 64bit types and fix registers if possible
# first verify that it's not pointer the regsister isn;t an adress register and a register pair
# first verify that it's not pointer the regsister isn;t an address register and a register pair
# isn't already defined.
if(($type !~ m/\*/) && ($reg !~ m/^a.*|^d\d\/d\d$/))
{
Expand Down
8 changes: 4 additions & 4 deletions SFDCompile.pod
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ __END__

=head1 NAME

sfdc - Compile SFD files into someting useful
sfdc - Compile SFD files into something useful

=head1 SYNOPSIS

Expand Down Expand Up @@ -174,7 +174,7 @@ Just loads and parses the SFD file. This is the default.
=item B<--output>

Specifies where the result will be stored. The following escape
sequencies are allowed in the file name. If the sequence B<%f> is
sequences are allowed in the file name. If the sequence B<%f> is
present in the name, a new file will be created for each function
processed.

Expand All @@ -186,7 +186,7 @@ The library base variable name (C<DOSBase>, for example).

=item B<%f>

The current funcion name (C<Open>, for example).
The current function name (C<Open>, for example).

=item B<%l>

Expand Down Expand Up @@ -275,7 +275,7 @@ provided. From this information, F<sfdc> can:

=item *

Generate an old-style B<FD> file for futher processing with other tools.
Generate an old-style B<FD> file for further processing with other tools.


=item *
Expand Down
4 changes: 2 additions & 2 deletions gg-sfdc.spec
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ Name : gg-%{Name}
Version : %{Version}
Release : 1

Summary : Compile SFD files into someting useful
Summary : Compile SFD files into something useful
Group : Development/Tools
Copyright : GPL
URL : http://www.lysator.liu.se/~lcs/files/gg-cross/
Expand All @@ -23,7 +23,7 @@ The basis for all work performed by sfdc is the SFD file, which contains
all required information about the module and the functions provided.
From this information, sfdc can:

* Generate an old-style FD file for futher processing with other
* Generate an old-style FD file for further processing with other
tools.

* Generate a C prototype file, such as those normally found in the
Expand Down
4 changes: 2 additions & 2 deletions gg-sfdc.spec.in
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ Name : gg-%{Name}
Version : %{Version}
Release : 1

Summary : Compile SFD files into someting useful
Summary : Compile SFD files into something useful
Group : Development/Tools
Copyright : GPL
URL : http://www.lysator.liu.se/~lcs/files/gg-cross/
Expand All @@ -23,7 +23,7 @@ The basis for all work performed by sfdc is the SFD file, which contains
all required information about the module and the functions provided.
From this information, sfdc can:

* Generate an old-style FD file for futher processing with other
* Generate an old-style FD file for further processing with other
tools.

* Generate a C prototype file, such as those normally found in the
Expand Down
14 changes: 7 additions & 7 deletions main.pl
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
#!/usr/bin/perl -w
#
# sfdc - Compile SFD files into someting useful
# sfdc - Compile SFD files into something useful
# Copyright (C) 2003-2005 Martin Blom <martin@blom.org>
#
# This program is free software; you can redistribute it and/or
Expand Down Expand Up @@ -731,7 +731,7 @@ ( $$$ )

# eliminate double spaces
$$prototype{'value'} =~ s/\s+/ /g;
# eliminate spaces befor registers
# eliminate spaces before registers
$$prototype{'value'} =~ s/,\s+([ad][0-7])/,${1}/g;
# eliminate spaces after opening brackets
$$prototype{'value'} =~ s/\(\s+([^,)]+)/\(${1}/g;
Expand All @@ -754,15 +754,15 @@ ( $$$ )
@array = (reverse $str) =~ / \)( (?: [^()]* | (?0) )* )\( /xg;

$registers = reverse $array[0];
$registers =~ s/^\s+|\s+$//g; # trim whitspaces
$registers =~ s/^\s+|\s+$//g; # trim whitespaces
$arguments = reverse $array[1];
$arguments =~ s/^\s+|\s+$//g; # trim whitspaces
$arguments =~ s/^\s+|\s+$//g; # trim whitespaces

$name = substr($str, 0, index($str, "(" . $arguments . ")"));
$name =~ s/^\s+|\s+$//g; # trim whitspaces
$name =~ s/^\s+|\s+$//g; # trim whitespaces
$return = substr($name, 0, rindex($name, " "));
$name = substr($name, rindex($name, " "));
$name =~ s/^\s+|\s+$//g; # trim whitspaces
$name =~ s/^\s+|\s+$//g; # trim whitespaces

# Nuke whitespaces from the register specification
$registers =~ s/\s//;
Expand Down Expand Up @@ -988,7 +988,7 @@ sub BEGIN {
}


### check_output: Check if the file will be reopended by open_output ##########
### check_output: Check if the file will be reopened by open_output ##########

sub will_close_output ( $$ ) {
my $sfd = shift;
Expand Down
24 changes: 12 additions & 12 deletions sfdc
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
#!/usr/bin/perl -w
#
# sfdc - Compile SFD files into someting useful
# sfdc - Compile SFD files into something useful
# Copyright (C) 2003-2005 Martin Blom <martin@blom.org>
#
# This program is free software; you can redistribute it and/or
Expand Down Expand Up @@ -731,7 +731,7 @@ sub parse_proto ( $$$ ) {

# eliminate double spaces
$$prototype{'value'} =~ s/\s+/ /g;
# eliminate spaces befor registers
# eliminate spaces before registers
$$prototype{'value'} =~ s/,\s+([ad][0-7])/,${1}/g;
# eliminate spaces after opening brackets
$$prototype{'value'} =~ s/\(\s+([^,)]+)/\(${1}/g;
Expand All @@ -754,15 +754,15 @@ sub parse_proto ( $$$ ) {
@array = (reverse $str) =~ / \)( (?: [^()]* | (?0) )* )\( /xg;

$registers = reverse $array[0];
$registers =~ s/^\s+|\s+$//g; # trim whitspaces
$registers =~ s/^\s+|\s+$//g; # trim whitespaces
$arguments = reverse $array[1];
$arguments =~ s/^\s+|\s+$//g; # trim whitspaces
$arguments =~ s/^\s+|\s+$//g; # trim whitespaces

$name = substr($str, 0, index($str, "(" . $arguments . ")"));
$name =~ s/^\s+|\s+$//g; # trim whitspaces
$name =~ s/^\s+|\s+$//g; # trim whitespaces
$return = substr($name, 0, rindex($name, " "));
$name = substr($name, rindex($name, " "));
$name =~ s/^\s+|\s+$//g; # trim whitspaces
$name =~ s/^\s+|\s+$//g; # trim whitespaces

# Nuke whitespaces from the register specification
$registers =~ s/\s//;
Expand Down Expand Up @@ -988,7 +988,7 @@ sub BEGIN {
}


### check_output: Check if the file will be reopended by open_output ##########
### check_output: Check if the file will be reopened by open_output ##########

sub will_close_output ( $$ ) {
my $sfd = shift;
Expand Down Expand Up @@ -3819,7 +3819,7 @@ BEGIN {
$reg =~ s/-/\//g;

# check for some possible 64bit types and fix registers if possible
# first verify that it's not pointer the regsister isn;t an adress register and a register pair
# first verify that it's not pointer the regsister isn;t an address register and a register pair
# isn't already defined.
if(($type !~ m/\*/) && ($reg !~ m/^a.*|^d\d\/d\d$/))
{
Expand Down Expand Up @@ -5459,7 +5459,7 @@ __END__

=head1 NAME

sfdc - Compile SFD files into someting useful
sfdc - Compile SFD files into something useful

=head1 SYNOPSIS

Expand Down Expand Up @@ -5628,7 +5628,7 @@ Just loads and parses the SFD file. This is the default.
=item B<--output>

Specifies where the result will be stored. The following escape
sequencies are allowed in the file name. If the sequence B<%f> is
sequences are allowed in the file name. If the sequence B<%f> is
present in the name, a new file will be created for each function
processed.

Expand All @@ -5640,7 +5640,7 @@ The library base variable name (C<DOSBase>, for example).

=item B<%f>

The current funcion name (C<Open>, for example).
The current function name (C<Open>, for example).

=item B<%l>

Expand Down Expand Up @@ -5729,7 +5729,7 @@ provided. From this information, F<sfdc> can:

=item *

Generate an old-style B<FD> file for futher processing with other tools.
Generate an old-style B<FD> file for further processing with other tools.


=item *
Expand Down
8 changes: 4 additions & 4 deletions sfdc.1
Original file line number Diff line number Diff line change
Expand Up @@ -139,7 +139,7 @@
.if n .ad l
.nh
.SH "NAME"
sfdc \- Compile SFD files into someting useful
sfdc \- Compile SFD files into something useful
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
sfdc [options] file1.sfd [file2.sfd ...]
Expand Down Expand Up @@ -262,7 +262,7 @@ Just loads and parses the \s-1SFD\s0 file. This is the default.
.IP "\fB\-\-output\fR" 8
.IX Item "--output"
Specifies where the result will be stored. The following escape
sequencies are allowed in the file name. If the sequence \fB\f(CB%f\fB\fR is
sequences are allowed in the file name. If the sequence \fB\f(CB%f\fB\fR is
present in the name, a new file will be created for each function
processed.
.RS 8
Expand All @@ -271,7 +271,7 @@ processed.
The library base variable name (\f(CW\*(C`DOSBase\*(C'\fR, for example).
.IP "\fB\f(CB%f\fB\fR" 4
.IX Item "%f"
The current funcion name (\f(CW\*(C`Open\*(C'\fR, for example).
The current function name (\f(CW\*(C`Open\*(C'\fR, for example).
.IP "\fB\f(CB%l\fB\fR" 4
.IX Item "%l"
The name of the library or device (\fIdos.library\fR, for example).
Expand Down Expand Up @@ -334,7 +334,7 @@ The basis for all work performed by \fIsfdc\fR is the \fB\s-1SFD\s0\fR file, whi
contains all required information about the module and the functions
provided. From this information, \fIsfdc\fR can:
.IP "\(bu" 4
Generate an old-style \fB\s-1FD\s0\fR file for futher processing with other tools.
Generate an old-style \fB\s-1FD\s0\fR file for further processing with other tools.
.IP "\(bu" 4
Generate a \fBC prototype file\fR, such as those normally found in the
\&\fIInclude/clib/\fR directory.
Expand Down
4 changes: 2 additions & 2 deletions sfdc.readme
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
Short: Compile SFD files into someting useful (v1.12)
Short: Compile SFD files into something useful (v1.12)
Author: Martin Blom <martin@blom.org>
Uploader: Martin Blom <martin@blom.org>
Type: dev/gcc
Expand All @@ -13,7 +13,7 @@ The basis for all work performed by sfdc is the SFD file, which contains
all required information about the module and the functions provided.
From this information, sfdc can:

* Generate an old-style FD file for futher processing with other
* Generate an old-style FD file for further processing with other
tools.

* Generate a C prototype file, such as those normally found in the
Expand Down
4 changes: 2 additions & 2 deletions sfdc.readme.in
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
Short: Compile SFD files into someting useful (v@PACKAGE_VERSION@)
Short: Compile SFD files into something useful (v@PACKAGE_VERSION@)
Author: Martin Blom <martin@blom.org>
Uploader: Martin Blom <martin@blom.org>
Type: dev/gcc
Expand All @@ -13,7 +13,7 @@ The basis for all work performed by sfdc is the SFD file, which contains
all required information about the module and the functions provided.
From this information, sfdc can:

* Generate an old-style FD file for futher processing with other
* Generate an old-style FD file for further processing with other
tools.

* Generate a C prototype file, such as those normally found in the
Expand Down
8 changes: 4 additions & 4 deletions sfdc.txt
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
NAME
sfdc - Compile SFD files into someting useful
sfdc - Compile SFD files into something useful

SYNOPSIS
sfdc [options] file1.sfd [file2.sfd ...]
Expand Down Expand Up @@ -114,13 +114,13 @@

--output
Specifies where the result will be stored. The following escape
sequencies are allowed in the file name. If the sequence %f is
sequences are allowed in the file name. If the sequence %f is
present in the name, a new file will be created for each
function processed.

%b The library base variable name ("DOSBase", for example).

%f The current funcion name ("Open", for example).
%f The current function name ("Open", for example).

%l The name of the library or device (dos.library, for
example).
Expand Down Expand Up @@ -174,7 +174,7 @@
all required information about the module and the functions provided.
From this information, sfdc can:

* Generate an old-style FD file for futher processing with other
* Generate an old-style FD file for further processing with other
tools.

* Generate a C prototype file, such as those normally found in the
Expand Down