From 530cfc096962be4d7114335466c449420896ff13 Mon Sep 17 00:00:00 2001
From: rtk0c <mail.tianyig@gmail.com>
Date: Fri, 1 Jul 2022 18:35:53 +0000
Subject: Add initial code for server-v2 in F#

git-svn-id: file:///home/arch/svn/epistmool/trunk@10 71f44415-077c-4ad7-a976-72ddbf76608f
---
 server-v2/EpistmoolServer.sln                        | 16 ++++++++++++++++
 server-v2/src/EpistmoolServer/EpistmoolServer.fsproj | 12 ++++++++++++
 server-v2/src/EpistmoolServer/Program.fs             |  6 ++++++
 3 files changed, 34 insertions(+)
 create mode 100644 server-v2/EpistmoolServer.sln
 create mode 100644 server-v2/src/EpistmoolServer/EpistmoolServer.fsproj
 create mode 100644 server-v2/src/EpistmoolServer/Program.fs

(limited to 'server-v2')

diff --git a/server-v2/EpistmoolServer.sln b/server-v2/EpistmoolServer.sln
new file mode 100644
index 0000000..fa7c1ff
--- /dev/null
+++ b/server-v2/EpistmoolServer.sln
@@ -0,0 +1,16 @@
+
+Microsoft Visual Studio Solution File, Format Version 12.00
+Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "EpistmoolServer", "src\EpistmoolServer\EpistmoolServer.fsproj", "{75BE8A79-B724-4F08-9821-37515BA00781}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|Any CPU = Debug|Any CPU
+		Release|Any CPU = Release|Any CPU
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{75BE8A79-B724-4F08-9821-37515BA00781}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{75BE8A79-B724-4F08-9821-37515BA00781}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{75BE8A79-B724-4F08-9821-37515BA00781}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{75BE8A79-B724-4F08-9821-37515BA00781}.Release|Any CPU.Build.0 = Release|Any CPU
+	EndGlobalSection
+EndGlobal
diff --git a/server-v2/src/EpistmoolServer/EpistmoolServer.fsproj b/server-v2/src/EpistmoolServer/EpistmoolServer.fsproj
new file mode 100644
index 0000000..7b4f671
--- /dev/null
+++ b/server-v2/src/EpistmoolServer/EpistmoolServer.fsproj
@@ -0,0 +1,12 @@
+<Project Sdk="Microsoft.NET.Sdk">
+
+    <PropertyGroup>
+        <OutputType>Exe</OutputType>
+        <TargetFramework>net6.0</TargetFramework>
+    </PropertyGroup>
+
+    <ItemGroup>
+        <Compile Include="Program.fs"/>
+    </ItemGroup>
+
+</Project>
diff --git a/server-v2/src/EpistmoolServer/Program.fs b/server-v2/src/EpistmoolServer/Program.fs
new file mode 100644
index 0000000..1014f80
--- /dev/null
+++ b/server-v2/src/EpistmoolServer/Program.fs
@@ -0,0 +1,6 @@
+open System
+
+[<EntryPoint>]
+let main args =
+    printfn $"Arguments passed to function : %A{args}"
+    0
-- 
cgit v1.2.3-70-g09d2