Skip to content
This repository was archived by the owner on May 1, 2024. It is now read-only.

Commit 34e142f

Browse files
committed
Break out type definitions
1 parent e097ab1 commit 34e142f

File tree

2 files changed

+36
-21
lines changed

2 files changed

+36
-21
lines changed

ElixirWeb.iss

Lines changed: 1 addition & 21 deletions
Original file line numberDiff line numberDiff line change
@@ -70,27 +70,7 @@ Name: "erlang\64"; Description: "{code:ConstGetErlangName64}"; GroupDescription:
7070
Name: "erlpath"; Description: "Append Erlang directory to Path environment variable"; GroupDescription: "Erlang"; Check: CheckToAddErlangPath
7171

7272
[Code]
73-
type
74-
TElixirReleaseType = (rtRelease, rtPrerelease, rtLatestRelease, rtLatestPrerelease, rtIncompatible);
75-
76-
TElixirRelease = record
77-
Version: String;
78-
URL: String;
79-
ReleaseType: TElixirReleaseType;
80-
Ref: TObject;
81-
end;
82-
83-
TErlangData = record
84-
OTPVersion: String;
85-
ERTSVersion: String;
86-
URL32: String;
87-
URL64: String;
88-
Exe32: String;
89-
Exe64: String;
90-
Name32: String;
91-
Name64: String;
92-
end;
93-
73+
#include "src\typedef.iss"
9474
var
9575
GlobalPageSelRelease: TInputOptionWizardPage;
9676
GlobalPageSelInstallType: TInputOptionWizardPage;

src/typedef.iss

Lines changed: 35 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,35 @@
1+
// typedef.iss - Specifies all custom types
2+
// Copyright 2014 Chris Hyndman
3+
//
4+
// Licensed under the Apache License, Version 2.0 (the "License");
5+
// you may not use this file except in compliance with the License.
6+
// You may obtain a copy of the License at
7+
//
8+
// http://www.apache.org/licenses/LICENSE-2.0
9+
//
10+
// Unless required by applicable law or agreed to in writing, software
11+
// distributed under the License is distributed on an "AS IS" BASIS,
12+
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13+
// See the License for the specific language governing permissions and
14+
// limitations under the License.
15+
16+
type
17+
TElixirReleaseType = (rtRelease, rtPrerelease, rtLatestRelease, rtLatestPrerelease, rtIncompatible);
18+
19+
TElixirRelease = record
20+
Version: String;
21+
URL: String;
22+
ReleaseType: TElixirReleaseType;
23+
Ref: TObject;
24+
end;
25+
26+
TErlangData = record
27+
OTPVersion: String;
28+
ERTSVersion: String;
29+
URL32: String;
30+
URL64: String;
31+
Exe32: String;
32+
Exe64: String;
33+
Name32: String;
34+
Name64: String;
35+
end;

0 commit comments

Comments
 (0)