From 4b707d6b98ad85dcd131858ceea329acb71da235 Mon Sep 17 00:00:00 2001
From: Artem3213212 <cx-1212@yandex.ru>
Date: Sat, 10 Mar 2018 15:04:19 +0300
Subject: [PATCH] Add Platform Control

---
 Source/Fasm4Delphi.pas | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/Source/Fasm4Delphi.pas b/Source/Fasm4Delphi.pas
index 597f0f9..9c90a18 100644
--- a/Source/Fasm4Delphi.pas
+++ b/Source/Fasm4Delphi.pas
@@ -3,12 +3,13 @@ unit Fasm4Delphi platform;
 {Delphi Translation&Tests:Artyom Gavrilov,Vlad Untkin.
  Donate:https://money.yandex.ru/to/410014959153552}
 
-interface 
-
-uses
-  Windows; 
+interface
 
 //{$Define FasmStaticLink}
+{$IFDEF WIN32}
+
+uses
+  Windows;
 
 type
   TFasmVersion=packed record
@@ -113,9 +114,11 @@ var
 procedure LoadFASM(Name:string=FASMDLLName);
 procedure FreeFASM;
 {$ENDIF}
+{$ENDIF}
 
 implementation
 
+{$IFDEF WIN32}
 {$IFNDEF FasmStaticLink}
 var
   &Library:THandle=0;
@@ -145,7 +148,8 @@ fasm_GetVersion:=nil;
 fasm_Assemble:=nil;
 fasm_AssembleFile:=nil; 
 &Library:=0;
-end;	   
+end;
+{$ENDIF}
 {$ENDIF}
 
 end.