diff --git a/CMakeLists.txt b/CMakeLists.txt
index d9131eb..729ce5c 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -27,6 +27,7 @@ endmacro()
 
 ####################################################################################################
 cm_example_project("Debug" DebugObject  debug/DebugObject.cpp)
+cm_example_project("Debug" AutoSCL      debug/AutoSCL.cpp)
 
 ####################################################################################################
 cm_example_project("DataType/RAM" RuntimeAssetManagerTest  datatype/ram/RuntimeAssetManagerTest.cpp
diff --git a/debug/AutoSCL.cpp b/debug/AutoSCL.cpp
new file mode 100644
index 0000000..c8245ed
--- /dev/null
+++ b/debug/AutoSCL.cpp
@@ -0,0 +1,49 @@
+#include<iostream>
+#include<string>
+#include<hgl/SourceCodeLocation.h>
+
+using namespace std;
+using namespace hgl;
+
+void out(const string &name,const SourceCodeLocation &scl)
+{
+    cout<<name<<": "<<scl.file<<" ("<<scl.line<<"): \""<<scl.func<<'"'<<endl;
+}
+
+class TestObject
+{
+    string name;
+    SourceCodeLocation scl;
+
+public:
+
+    TestObject(const SourceCodeLocation &_scl,const string &n)
+    {
+        name=n;
+        scl=_scl;
+    }
+
+    void out()
+    {
+        ::out(name,scl);
+    }
+};
+
+#define NewObject(class_name,...)  new class_name(HGL_SCL_HERE __VA_OPT__(,) __VA_ARGS__)
+
+int main(int,char **)
+{
+    SourceCodeLocation scl=HGL_SCL_HERE;
+    
+    out("C++",scl);
+
+    TestObject to(HGL_SCL_HERE,"TO1");
+
+    to.out();
+
+    auto to2=NewObject(TestObject,"NEW");
+
+    to2->out();
+    
+    return 0;
+}
\ No newline at end of file