diff --git a/1998/bas1/bas1.c b/1998/bas1/bas1.c
index 451e47681..6fbd9875b 100644
--- a/1998/bas1/bas1.c
+++ b/1998/bas1/bas1.c
@@ -23,7 +23,7 @@ char r[]="C#S3K+[;G'W7OB/_? ? 
 [48][3]={ { { 2} } } ; void**V,*D,*F[32][48];
 void*Q(void**O){ return*O?(*O=Q(*O)):O; } U(
 O){return E+=(O/=2)-1?U((A=A/2^57525273+(A&
-1^O&1)*9583591<<5,O)),0:O,16; } main(O){ A
+1^O&1)*9583591<<5,O)),0:O,16; } main(O,S)char**S;{ A
 =O?time(D):953351751; z I=0; I<26; ++I){z
 N=I/2; N<30+I/2; ++N){ z M=0; M<3; ++M){
 p Z=O)z; (B=I+Z*!!M) <26&&N+Z*(M!=2)-B/
diff --git a/thanks-for-fixes.md b/thanks-for-fixes.md
index 3335cc473..39d0ae042 100644
--- a/thanks-for-fixes.md
+++ b/thanks-for-fixes.md
@@ -1996,6 +1996,16 @@ they do have page up and page down but this gives a default for those who don't
 have them like with Macs.
 
 
+## [1998/bas1](1998/bas1/bas1.c) ([README.md](1998/bas1/README.md]))
+
+Cody, out of an abundance of caution, added a second arg to `main()` as some
+versions of clang whine about the number of args on top of what type they are
+In particular some versions claim that they only allow 0, 2 or 3 args. It
+appears that they do allow 1 but for instance 4 is not allowed. However as it's
+quite possible they will 'fix' this defect it would be better to have this not
+be a problem at such a time.
+
+
 ## [1998/bas2](1998/bas2/bas2.c) ([README.md](1998/bas2/README.md]))
 
 Cody added the [try.sh](1998/bas2/try.sh) script which runs some default actions