diff --git a/Tutorial/Console_Workflow/Console_Workflow.sln b/Tutorial/Console_Workflow/Console_Workflow.sln index 0f2d7f59..5671bfd8 100644 --- a/Tutorial/Console_Workflow/Console_Workflow.sln +++ b/Tutorial/Console_Workflow/Console_Workflow.sln @@ -11,6 +11,8 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "W02_InvokingCppClasses", "W EndProject Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "W03_InheritingCppInterfaces", "W03_InheritingCppInterfaces\W03_InheritingCppInterfaces.vcxproj", "{E53A8108-D14F-453D-969E-D00E2668396C}" EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "W04_InheritingCppClasses", "W04_InheritingCppClasses\W04_InheritingCppClasses.vcxproj", "{0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}" +EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|x64 = Debug|x64 @@ -51,6 +53,14 @@ Global {E53A8108-D14F-453D-969E-D00E2668396C}.Release|x64.Build.0 = Release|x64 {E53A8108-D14F-453D-969E-D00E2668396C}.Release|x86.ActiveCfg = Release|Win32 {E53A8108-D14F-453D-969E-D00E2668396C}.Release|x86.Build.0 = Release|Win32 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Debug|x64.ActiveCfg = Debug|x64 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Debug|x64.Build.0 = Debug|x64 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Debug|x86.ActiveCfg = Debug|Win32 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Debug|x86.Build.0 = Debug|Win32 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Release|x64.ActiveCfg = Release|x64 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Release|x64.Build.0 = Release|x64 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Release|x86.ActiveCfg = Release|Win32 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C}.Release|x86.Build.0 = Release|Win32 EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE diff --git a/Tutorial/Console_Workflow/W04_InheritingCppClasses/Main.cpp b/Tutorial/Console_Workflow/W04_InheritingCppClasses/Main.cpp new file mode 100644 index 00000000..d694f36f --- /dev/null +++ b/Tutorial/Console_Workflow/W04_InheritingCppClasses/Main.cpp @@ -0,0 +1,179 @@ +#include + +using namespace vl; +using namespace vl::console; +using namespace vl::collections; +using namespace vl::parsing; +using namespace vl::reflection; +using namespace vl::reflection::description; +using namespace vl::workflow; +using namespace vl::workflow::emitter; +using namespace vl::workflow::runtime; + +namespace myapi +{ + class App : public Object, public Description + { + private: + WString name; + List> subscriptions; + + public: + static WString Get() + { + return Console::Read(); + } + + static WString Get(const WString& message) + { + Console::Write(message); + return Console::Read(); + } + + static void Print(const WString& text) + { + Console::WriteLine(text); + } + + App() = default; + + ~App() + { + FOREACH(Ptr, sub, subscriptions) + { + sub->Close(); + } + } + + Event NameChanged; + + WString GetName() + { + return name; + } + + void SetName(const WString& value) + { + if (name != value) + { + name = value; + NameChanged(); + } + } + + List>& GetSubscriptions() + { + return subscriptions; + } + }; +} + +#define MYAPI_TYPELIST(F)\ + F(myapi::App)\ + +namespace vl +{ + namespace reflection + { + namespace description + { + MYAPI_TYPELIST(DECL_TYPE_INFO) + MYAPI_TYPELIST(IMPL_CPP_TYPE_INFO) + + using namespace myapi; + +#define _ , + + BEGIN_CLASS_MEMBER(App) + CLASS_MEMBER_STATIC_METHOD_OVERLOAD(Get, NO_PARAMETER, WString(*)()) + CLASS_MEMBER_STATIC_METHOD_OVERLOAD(Get, { L"message" }, WString(*)(const WString&)) + CLASS_MEMBER_STATIC_METHOD(Print, { L"text" }) + + CLASS_MEMBER_CONSTRUCTOR(Ptr(), NO_PARAMETER) + + CLASS_MEMBER_EVENT(NameChanged) + CLASS_MEMBER_PROPERTY_EVENT_FAST(Name, NameChanged) + CLASS_MEMBER_PROPERTY_READONLY_FAST(Subscriptions) + END_CLASS_MEMBER(App) + +#undef _ + class MyApiTypeLoader : public Object, public ITypeLoader + { + public: + void Load(ITypeManager* manager) + { + MYAPI_TYPELIST(ADD_TYPE_INFO) + } + + void Unload(ITypeManager* manager) + { + } + }; + } + } +} + +const wchar_t ScriptCode[] = LR"Workflow( + +module sampleModule; + +using myapi::*; + +namespace myscript +{ + class MyApp : App + { + new(name: string) + { + Name = name; + + value subscription = bind($"Hello, $(this.Name)"); + subscription.Open(); + attach(subscription.ValueChanged, + func (value: object): void + { + Print(cast string value); + }); + Subscriptions.Add(subscription); + } + } +} + +)Workflow"; + +int main() +{ + // start reflection + LoadPredefinedTypes(); + WfLoadLibraryTypes(); + GetGlobalTypeManager()->AddTypeLoader(new MyApiTypeLoader); + GetGlobalTypeManager()->Load(); + + { + // prepare Workflow script code + List codes; + codes.Add(WString(ScriptCode, false)); + + // compile code and get assemblies + List> errors; + auto table = WfLoadTable(); + auto assembly = Compile(table, codes, errors); + CHECK_ERROR(assembly && errors.Count() == 0, L"Please check the 'errors' variable."); + + // initialize the assembly + auto globalContext = MakePtr(assembly); + auto initializeFunction = LoadFunction(globalContext, L""); + initializeFunction(); + + // call MyApp + auto myapp = UnboxValue>(Value::Create( + L"myscript::MyApp", + ( + Value_xs(), WString(L"vczh") + ))); + myapp->SetName(L"Gaclib"); + } + + // stop reflection + DestroyGlobalTypeManager(); +} \ No newline at end of file diff --git a/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj b/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj new file mode 100644 index 00000000..5b52dc15 --- /dev/null +++ b/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj @@ -0,0 +1,160 @@ + + + + + Debug + Win32 + + + Release + Win32 + + + Debug + x64 + + + Release + x64 + + + + 15.0 + {0A86BD59-877D-440B-9E7D-7E1E7DF6AB2C} + Win32Proj + W04InheritingCppClasses + 10.0.17763.0 + + + + Application + true + v141 + Unicode + + + Application + false + v141 + true + Unicode + + + Application + true + v141 + Unicode + + + Application + false + v141 + true + Unicode + + + + + + + + + + + + + + + + + + + + + true + $(ProjectDir)..\..\..\Import;$(IncludePath) + + + true + $(ProjectDir)..\..\..\Import;$(IncludePath) + + + false + $(ProjectDir)..\..\..\Import;$(IncludePath) + + + false + $(ProjectDir)..\..\..\Import;$(IncludePath) + + + + Level3 + Disabled + true + WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) + true + + + true + Console + + + + + Level3 + Disabled + true + _DEBUG;_CONSOLE;%(PreprocessorDefinitions) + true + + + true + Console + + + + + Level3 + MaxSpeed + true + true + true + WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) + true + + + true + true + true + Console + + + + + Level3 + MaxSpeed + true + true + true + NDEBUG;_CONSOLE;%(PreprocessorDefinitions) + true + + + true + true + true + Console + + + + + {6d6fe50e-fd92-46f1-8897-3045e14be02b} + + + + + + + + + \ No newline at end of file diff --git a/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj.filters b/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj.filters new file mode 100644 index 00000000..e25ab333 --- /dev/null +++ b/Tutorial/Console_Workflow/W04_InheritingCppClasses/W04_InheritingCppClasses.vcxproj.filters @@ -0,0 +1,22 @@ + + + + + {4FC737F1-C7A5-4376-A066-2A32D752A2FF} + cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx + + + {93995380-89BD-4b04-88EB-625FBE52EBFB} + h;hh;hpp;hxx;hm;inl;inc;ipp;xsd + + + {67DA6AB6-F800-4c08-8B7A-83BB121AAD01} + rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms + + + + + Source Files + + + \ No newline at end of file