diff --git a/Source/uPSCompiler.pas b/Source/uPSCompiler.pas
index 8c87293..66422bb 100644
--- a/Source/uPSCompiler.pas
+++ b/Source/uPSCompiler.pas
@@ -12786,6 +12786,9 @@ begin
   AddConstantN('varTypeMask', 'Word').Value.tu16 := vartypemask;
   AddConstantN('varArray', 'Word').Value.tu16 := vararray;
   AddConstantN('varByRef', 'Word').Value.tu16 := varByRef;
+{$IFDEF UNICODE}
+  AddConstantN('varUString', 'Word').Value.tu16 := varUString;
+{$ENDIF}
   AddDelphiFunction('function Unassigned: Variant;');
   AddDelphiFunction('function VarIsEmpty(const V: Variant): Boolean;');
   AddDelphiFunction('function Null: Variant;');