インスピレーションを受けた日曜日に1回だけ失敗した単体テストがあり、日曜日にエラーをスローするだけのプログラムまたは関数を作成し、他の日に正常に終了しました。

ルール：

• 入力を使用したり、通常のIOメソッドを使用して出力を表示したりすることは、STDERRまたは同等の言語に出力する場合を除きます。エラーの副産物である場合は、STDOUTに出力できます。
• 関数は、何も出力しない限り、非日曜日に値を返す場合があります
• プログラムは、一貫している限り、任意のタイムゾーンまたはローカルタイムゾーンの日曜日を使用できます。
• エラーは、ゼロ除算エラーや初期化されていない変数の使用など、プログラムを異常終了させるものです。これは、エラーが発生した部分の後にコードが追加された場合、日曜日に実行されないことを意味します。
  • Pythonに相当するエラーを手動で作成するステートメントを使用することもできますraise。
  • これには、実行時エラー、構文エラー、コンパイル中のエラーが含まれます（幸運を祈ります！）
• エラーには、エラーがないことを区別する記号が必要です。
• これはcode-golfなので、各言語で最も短いバイト数が勝ちです！

私は答えを確認するために日曜日まで待つ必要があります;）

Bash + coreutils、15 14バイト

`date|grep Su`

オンラインでお試しください！

PHP 7、12バイト

1%date("w");

PHP 7ではDivisionByZero、日曜日に型の例外をスローします。HHVMを使用して解釈した場合も同じことが起こります。

PHP 5では、stderr日曜日に警告（オン）が表示されます。

PHP Warning:  Division by zero in Command line code on line 1

どのPHPバージョンでも、他の曜日には何も表示されません。

CLIを使用して実行します。

php -r '1%date("w");'

またはオンラインでお試しください！

引用符（1%date(w);）を取り除くことでさらに2バイトを圧縮できますが、これにより通知がトリガーされます（これはに適切に設定error_reporting = E_ALL & ~E_NOTICEすることで抑制できますphp.ini）。

PHP、15バイト

<?@date(w)?:\n;

デフォルト設定を想定しています。

日曜日に出力

Fatal error: Undefined constant 'n' on line 1

オンラインでお試しください！

Java 8、69 43 34バイト

v->1/new java.util.Date().getDay()

@OlivierGrégoireに感謝-26バイト。@Neilの
おかげで-9バイト。

説明：

ここで試してみてください。

• v->{...}（未使用Void nullパラメーター）は（パラメーターなし）より1バイト短くなり()->{...}ます。
• new java.util.Date().getDay()日曜日〜土曜日のための0-6を返しますので、1/...与えるjava.lang.ArithmeticException: / by zeroだけ日曜日に起きた、値が0の場合はエラーを。

Python 3、33バイト

import time
"Su"in time.ctime()>q

オンラインでお試しください！

Python 3、50バイト

from datetime import*
datetime.now().weekday()>5>q

オンラインでお試しください！

Rodのおかげで約3バイト節約できました。

Pyth、8 7バイト

 l-6.d9

オンラインでお試しください！

説明

    .d9 # Get the current day of week (0 = Monday, 6 = Sunday)
  -6    # Subtract 6 from the day
 l      # Try to calculate the log base 2 of the result of the previous operation raising a "ValueError: math domain error" on sundays
        # there is an extra space at the start, to supress the output on the other days

Haskell + Data.Dates、55バイト

import Data.Dates
succ.dateWeekDay<$>getCurrentDateTime

オンラインでお試しください！

これは、日曜日が週の最後の日であるという事実を使用しています。dateWeekDay曜日をWeekDayタイプとして返します。これは単に

data WeekDay = Monday | Tuesday | Wednesday | Thursday | Friday | Saturday | Sunday

WeekDayはのインスタンスでEnumあるため、を使用succしpredて、平日の後続または先行を取得できます（例：succ Mondayyields）Tuesday。

ただし、Sunday最後の列挙型エントリなので、呼び出すとsucc Sunday次のエラーが発生します。

fail_on_sunday.hs: succ{WeekDay}: tried to take `succ' of last tag in enumeration
CallStack (from HasCallStack):
  error, called at .\Data\Dates.hs:56:34 in dates-0.2.2.1-6YwCvjmBci55IfacFLnAPe:Data.Dates

編集1：-3バイトのnimiに感謝します！
編集2：機能が許可されるようになった-11バイト。

完全なプログラム：88 81 74 69 66バイト

import Data.Dates
main=pure$!succ.dateWeekDay<$>getCurrentDateTime

オンラインでお試しください！

pure結果をWeekDayIO Monadに戻すために必要です。ただし、Haskellは、プログラムによって値が出力されないため、そのままでは式が評価されないため、日曜日であってもプログラムは失敗しません。これが$!必要な理由で、Haskellが通常式を評価しない場合でも評価を強制します。

以前のアプローチData.Time：127 124バイト

import Data.Time.Clock
import Data.Time.Calendar.WeekDate
c(_,_,d)|d<7=d
main=getCurrentTime>>=(pure$!).c.toWeekDate.utctDay

オンラインでお試しください！これらはいくつかの印象的な輸入品です。d<7たとえばd/=5、金曜日に失敗をテストするように変更します。次の例外で失敗しますNon-exhaustive patterns in function c。

05AB1E、45 44バイト

05AB1Eには曜日を取得するための組み込み機能がないため、Zellerのルールを使用して計算しました。

日曜日の場合、stderrに改行を出力します（TIOのデバッグビューで確認可能）

žežf11+14%Ì13*5÷žgžf3‹-т%D4÷žgт÷©4÷®·(O7%i.ǝ

オンラインでお試しください！

説明

使用される一般式は、
DoW = d + [(13*(m+1))/5] + y + [y/4] + [c/4] - 2*c
ここでDoW=day of week、d=day、m=month、y=last 2 digits of year、c=centuryおよび括弧内の式（[]）切り捨てれます。

式で使用される各月は数字に対応しJan=13,Feb=14,Mar=3,...,Dec=12
ます。より一般的な形式で現在の月があるのでJan=1,...,Dec=12 、式を使用して月を変換します
m = (m0 + 11) % 14 + 1

3月が最初の月である副産物として、1月と2月は前年に属しているため、決定の計算は次のようにyなります。
y = (year - (m0 < 3)) % 100

DoW取得する最終的な値はint 0=Sat,1=Sun,...,6=Friです。
結果がtrueの場合、明示的にエラーをスローできるようになりました。

JavaScript、23バイト

Date().slice(1)>'um'&&k

完全なプログラム。

変数kは定義しないでください。

JavaScript、Rick Hitchcockによる20バイト

/Su/.test(Date())&&k

JavaScript、apsillersによる19バイト

Date().match`Su`&&k

VBA / VBScript、22 20バイト

^{_{テイラースコットのおかげで2バイト節約できました。}}

a=1/(Weekday(Now)-1)

これは、イミディエイトウィンドウで実行する必要があります。Weekday()1（日曜日）から7（土曜日）を返すため、日曜日にゼロ除算エラーが発生します。それ以外の場合、出力はありません。

ルビー、15バイト

1/Time.now.wday

wday日曜日に0を返し、ZeroDivisionError：0で割ったエラーが発生します。例：1/Time.new(2018,1,7).wday。

Perl 5、13バイト

1/(gmtime)[6]

オンラインでお試しください！

@biketireのanswerjを移植

@mikのリマインダーで3バイトを削除

jq、42文字

（39文字のコード+ 3文字のコマンドラインオプション）

now|strftime("%w")|strptime("%d")|empty

ここで別のアプローチを試してみてください：月の日番号（1..31）として週の日番号（0..6）を解析します。

サンプル実行：

bash-4.4$ TZ=UTC faketime 2018-01-06 jq -n 'now|strftime("%w")|strptime("%d")|empty'

bash-4.4$ TZ=UTC faketime 2018-01-07 jq -n 'now|strftime("%w")|strptime("%d")|empty'
jq: error (at <unknown>): date "0" does not match format "%d"

jqはUTC日付のみを処理することに注意してください。

オンラインでお試しください！

C、35、34 27バイト

f(n){n/=time(0)/86400%7^3;}

@MartinEnderと@Dennisのおかげで-7バイト

オンラインでお試しください！

VBA 18バイト

これは、ビルトイン関数date()が7で除算すると1が残る日数を返すことに依存しているため、OSやCPU固有の場合があります。

a=1/(date mod 7-1)

VBAプロジェクトのイミディエイトウィンドウで実行されます。

R、31バイト 30バイト

if(format(Sys.Date(),'%u')>6)a

オンラインでお試しください！

日曜日以外、日曜日には出力がありませんError: object 'a' not found。

format(Sys.Date(),'%u')は平日を取得するための最短の方法で、曜日には文字クラスの番号を、日曜日には7を出力します。数値7と比較することができ、真の場合は未定義のオブジェクトを使用しようとします。

ジュゼッペのおかげでバイトを節約できました！

Ocaml、46バイト

open Unix
let()=1/(gmtime(time())).tm_wday;()

そしてocaml REPLでは、letとfinalを削除することでより良い結果を得ることができます:()：

$ open Unix;;1/(gmtime(time())).tm_wday;;<CR>

これは41バイトです（キャリッジリターン用に1バイトを含む）。

SAS、36バイト

%put %eval(1/(1-%index(&sysday,Su)))

TI-Basic 84 +、23バイト

getDate
0/(1-dayOfWk(Ans(1),Ans(2),Ans(3

日付と時刻のコマンドが必要です。これは84以上のみです。

MATL、12バイト

vZ'8XOs309>)

日曜日に生成されるエラーは次のとおりです。

• Octaveでの実行：

  MATL run-time error: The following Octave error refers to statement number 9:  )
  ---
  array(1): out of bound 0
  

• Matlabで実行する：

  MATL run-time error: The following MATLAB error refers to statement number 9:  )
  ---
  Index exceeds matrix dimensions
  

動作を反転するには（日曜日を除く任意の日のエラー）、~afterを追加し>ます。

オンラインでお試しください！

説明

これは、

• 論理インデックスを使用した空の配列へのインデックス付けfalseは有効です（結果は空の配列であり、出力は生成されません）。一方、

• true配列に最初のエントリがないため、インデックスを作成するとエラーが発生します。

コメントされたコード：

v       % Concatenate stack. Gives empty array
Z'      % Push current date and time as a number
8XO     % Convert to date string with format 8: gives 'Mon', 'Tue' etc
s       % Sum of ASCII codes. Gives 310 for 'Sun', and less for others
309>    % Greater than 309? Gives true for 'Sun', false for others
)       % Index into the empty array
        % Implicit display. Empty arrays are not displayed (not even newline)

Q、20バイト

if[1=.z.d mod 7;'e]

.zdは現在の日付を返します。modは現在の日付のモジュロを行い、intを返します。日付が日曜日の場合、.zd mod 7は1を返します。1= 1の場合（日曜日）、 '演算子を使用してエラーが発生します。簡潔にするため、エラーはe文字のみです。

C＃（.NET Core）、55 54 48バイト

オンラインでお試しください！

シャギーのおかげで1バイト節約

Emignaのおかげで5バイト節約

Kevin Cruijssenのおかげで1バイト節約

_=>{var k=1/(int)System.DateTime.Now.DayOfWeek;}

日曜日がenumで0にインデックス付けされているか、そうでない場合は (System.DayOfWeek)7

Groovy、16バイト

1/new Date().day

オンラインでお試しください！

C、 68  55バイト

13バイトを節約してくれた@Ken YNに感謝します！

#import<time.h>
f(n){time(&n);n/=gmtime(&n)->tm_wday;;}

オンラインでお試しください！

R、40バイト

stopifnot(weekdays(Sys.Date(),T)!="Sun")

オンラインでお試しください！

weekdaysオプションの引数とともに日付の曜日を返しますabbreviate。これはに短縮さSundayれSun、1バイトを節約します。

stopifnot各引数に、ない場合はエラーがスローallされTRUE、そしてそれらのではない最初の要素を示すメッセージでエラーをスローTRUEエラーであるので、Error: "Sun" is not TRUE

APL（Dyalog）、23バイト

⎕CY'dfns'
o←÷7|⌊days⎕TS

オンラインでお試しください！

Gema、40文字

\A=@subst{Su=\@err\{S\}\;*=;@datime}@end

エラーメッセージを指定する必要があったので、短いものを選択してください：「S」。

サンプル実行：

bash-4.4$ faketime 2018-01-06 gema '\A=@subst{Su=\@err\{S\}\;*=;@datime}@end'

bash-4.4$ faketime 2018-01-07 gema '\A=@subst{Su=\@err\{S\}\;*=;@datime}@end'
S

ファンキー、21バイト

if!os.date"%w"error()

os.date"%w"現在の曜日を0〜6形式で返します。0は日曜日です。それ以外の論理値を取得するのは、曜日が0の場合にのみ当てはまるため、日曜日になります。それから、if(a){error()}このプログラムは日曜日にのみエラーになることを保証します

オンラインでお試しください！

Perl 6の、 29の  21バイト

die if now.Date.day-of-week>6

それを試してみてください

die if now/86400%7+^3

それを試してみてください

ジュリア0.5、28バイト

Dates.dayofweek(now())<7||~-

オンラインでお試しください！

これは0.6では機能しませんが、0.4では機能します。