diff --git a/Scanner.pas b/Scanner.pas
index f9a7c7f..3a2c18f 100644
--- a/Scanner.pas
+++ b/Scanner.pas
@@ -1477,7 +1477,7 @@ if macro^.readOnly then begin           {handle special macros}
 
       5: begin                          {__STDC__}
          token.kind := intConst;        {__ORCAC__}
-         token.numString := @oneStr;
+         token.numString := @oneStr;    {__STDC_NO_...__}
          token.class := intConstant;
          token.ival := 1;
          oneStr := '1';
@@ -3752,6 +3752,42 @@ mp^.algorithm := 6;
 bp := pointer(ord4(macros) + hash(mp^.name));
 mp^.next := bp^;
 bp^ := mp;
+new(mp);                                {__STDC_NO_ATOMICS__}
+mp^.name := @'__STDC_NO_ATOMICS__';
+mp^.parameters := -1;
+mp^.tokens := nil;
+mp^.readOnly := true;
+mp^.algorithm := 5;
+bp := pointer(ord4(macros) + hash(mp^.name));
+mp^.next := bp^;
+bp^ := mp;
+new(mp);                                {__STDC_NO_COMPLEX__}
+mp^.name := @'__STDC_NO_COMPLEX__';
+mp^.parameters := -1;
+mp^.tokens := nil;
+mp^.readOnly := true;
+mp^.algorithm := 5;
+bp := pointer(ord4(macros) + hash(mp^.name));
+mp^.next := bp^;
+bp^ := mp;
+new(mp);                                {__STDC_NO_THREADS__}
+mp^.name := @'__STDC_NO_THREADS__';
+mp^.parameters := -1;
+mp^.tokens := nil;
+mp^.readOnly := true;
+mp^.algorithm := 5;
+bp := pointer(ord4(macros) + hash(mp^.name));
+mp^.next := bp^;
+bp^ := mp;
+new(mp);                                {__STDC_NO_VLA__}
+mp^.name := @'__STDC_NO_VLA__';
+mp^.parameters := -1;
+mp^.tokens := nil;
+mp^.readOnly := true;
+mp^.algorithm := 5;
+bp := pointer(ord4(macros) + hash(mp^.name));
+mp^.next := bp^;
+bp^ := mp;
 SetDateTime;                            {set up the macro date/time strings}
 					{set up the version string}
 versionStrL := pointer(GMalloc(3 + length(versionStr)));