--- a/ParserFlags.st	Wed Jan 17 22:29:07 2018 +0000
+++ b/ParserFlags.st	Wed Mar 21 23:23:48 2018 +0000
@@ -1722,6 +1722,9 @@
     self useGnuC ifTrue:[ 
         self initializeSTCFlagsForGCC.
     ].
+    self useClang ifTrue:[ 
+        self initializeSTCFlagsForClang.
+    ].    
     self useMingw32 ifTrue:[ 
         self initializeSTCFlagsForMINGW32.
     ].
@@ -1739,6 +1742,21 @@
     "Modified: / 09-08-2006 / 18:47:18 / fm"
     "Modified: / 16-11-2016 / 22:32:03 / cg"
     "Modified: / 06-01-2016 / 22:25:30 / jv"
+    "Modified: / 21-03-2018 / 23:20:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+initializeSTCFlagsForClang
+    self ccPath: 'clang'.
+    self linkCommand: 'clang'.
+    ExternalAddress pointerSize == 4 ifTrue:[
+        self linkArgs: '-m32'.
+        self linkSharedArgs: '-shared -m32'
+    ] ifFalse:[ 
+        self linkArgs: '-m64'.
+        self linkSharedArgs: '-shared -m64'
+    ].
+
+    "Created: / 21-03-2018 / 23:20:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 initializeSTCFlagsForGCC