แรงบันดาลใจจากเรามีการทดสอบหน่วยครั้งเดียวซึ่งล้มเหลวในวันอาทิตย์เท่านั้นเขียนโปรแกรมหรือฟังก์ชั่นที่ไม่ทำอะไรเลยนอกจากโยนข้อผิดพลาดเมื่อมันเป็นวันอาทิตย์และออกอย่างสง่างามในวันอื่น ๆ

กฎ:

• ไม่ใช้อินพุตหรือแสดงเอาต์พุตผ่านวิธีการ IO ปกติยกเว้นการพิมพ์ไปยัง STDERR หรือภาษาที่เทียบเท่าของคุณ คุณได้รับอนุญาตให้พิมพ์ไปที่ STDOUT หากเป็นผลพลอยได้จากข้อผิดพลาดของคุณ
• ฟังก์ชั่นอาจคืนค่าในวันอาทิตย์ตราบใดที่มันไม่ได้พิมพ์อะไรเลย
• โปรแกรมของคุณอาจใช้วันอาทิตย์จากเขตเวลาใดก็ได้หรือเขตเวลาท้องถิ่นตราบใดที่มีความสอดคล้อง
• ข้อผิดพลาดคือสิ่งที่ทำให้โปรแกรมหยุดทำงานผิดปกติเช่นการหารด้วยข้อผิดพลาดที่เป็นศูนย์หรือการใช้ตัวแปรที่ไม่มีการกำหนดค่าเริ่มต้น ซึ่งหมายความว่าหากมีการเพิ่มรหัสใด ๆ หลังจากส่วนที่มีข้อผิดพลาดจะไม่ถูกประมวลผลในวันอาทิตย์
  • raiseนอกจากนี้คุณยังสามารถใช้งบที่ตนเองสร้างข้อผิดพลาดเทียบเท่ากับงูใหญ่
  • ซึ่งรวมถึงข้อผิดพลาดขณะทำงานข้อผิดพลาดทางไวยากรณ์และข้อผิดพลาดขณะรวบรวม (ขอให้โชคดี!)
• ในข้อผิดพลาดจะต้องมีสัญญาณบางอย่างที่แตกต่างจากไม่มีข้อผิดพลาด
• นี่คือรหัสกอล์ฟดังนั้นจำนวนไบต์ที่สั้นที่สุดในแต่ละภาษาจะชนะ!

ฉันจะต้องรอจนกว่าจะถึงวันอาทิตย์เพื่อตรวจสอบคำตอบ;)

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);) แต่ทริกเกอร์นี้แจ้งให้ทราบล่วงหน้า (ที่สามารถระงับโดยตั้งอย่างถูกต้อง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()

-26 ไบต์ขอบคุณที่@ OlivierGrégoire
-9 ไบต์ขอบคุณที่@Neil

คำอธิบาย:

ลองที่นี่

• v->{...}( พารามิเตอร์ที่ไม่ได้ใช้Void null ) สั้นกว่าหนึ่งไบต์()->{...}(ไม่มีพารามิเตอร์)
• 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

ลองออนไลน์!

ที่บันทึกไว้ ~ 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 วันที่ , 55 ไบต์

import Data.Dates
succ.dateWeekDay<$>getCurrentDateTime

ลองออนไลน์!

สิ่งนี้ใช้ความจริงที่ว่าวันอาทิตย์เป็นวันสุดท้ายของสัปดาห์ dateWeekDayส่งคืนวันในสัปดาห์เป็นWeekDayประเภทซึ่งมีการกำหนดเพียงแค่เป็น

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

WeekDayเป็นตัวอย่างของEnumทำให้เราสามารถใช้succและpredเพื่อให้ได้ทายาทหรือบรรพบุรุษของวันธรรมดาเช่นอัตราผลตอบแทนsucc MondayTuesday

อย่างไรก็ตามSundayเป็นรายการ enum ล่าสุดดังนั้นการเรียก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: ขอบคุณ nimi สำหรับ -3 ไบต์!
แก้ไข 2: -11 ไบต์ในขณะนี้อนุญาตให้ใช้ฟังก์ชันได้

โปรแกรมเต็มรูปแบบ: 88 81 74 69 66 ไบต์

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

ลองออนไลน์!

pureจำเป็นต้องใช้เพื่อยกผลลัพธ์ที่ได้WeekDayกลับคืนสู่ IO 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 ไม่มีโครงสร้างในการรับวันในสัปดาห์ฉันจึงใช้กฎของเซลเลอร์เพื่อคำนวณ

พิมพ์บรรทัดใหม่เป็น 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

ในฐานะที่เป็นสองขั้วของเดือนมีนาคมเป็นเดือนแรกมกราคมและกุมภาพันธ์เป็นของปีก่อนดังนั้นการคำนวณสำหรับการพิจารณาyกลายเป็น
y = (year - (m0 < 3)) % 100

มูลค่าขั้นสุดท้ายสำหรับการDoWที่เราได้รับเป็น int 0=Sat,1=Sun,...,6=Friที่
ตอนนี้เราสามารถโยนข้อผิดพลาดได้อย่างชัดเจนหากผลลัพธ์เป็นจริง

JavaScript ขนาด 23 ไบต์

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

โปรแกรมเต็มรูปแบบ

kต้องไม่กำหนดตัวแปร

JavaScript ขนาด 20 ไบต์โดย Rick Hitchcock

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

JavaScript ขนาด 19 ไบต์โดย apsillers

Date().match`Su`&&k

VBA / VBScript, 22 20 ไบต์

^{_{บันทึก 2 ไบต์ขอบคุณ Taylor Scott}}

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

ลบ 3 ไบต์ด้วยคำเตือน @ mik

jq, 42 ตัวอักษร

(ตัวเลือกรหัสบรรทัด 39 ตัวอักษร + 3 ตัวอักษร)

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

ลองใช้วิธีอื่นที่นี่: แยกหมายเลขวันในสัปดาห์ (0..6) เป็นจำนวนวันต่อเดือน (1..31)

วิ่งตัวอย่าง:

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;}

-7 ไบต์ด้วยขอบคุณ @MartinEnder และ @Dennis

ลองออนไลน์!

VBA 18 ไบต์

สิ่งนี้ขึ้นอยู่กับฟังก์ชัน inbuilt ที่date()ส่งคืนหมายเลขวันที่เหลือ 1 ถ้าหารด้วย 7 ดังนั้นอาจเป็นระบบปฏิบัติการและ / หรือ 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 และถ้าพยายามจริงที่จะใช้วัตถุที่ไม่ได้กำหนด

บันทึกเป็นไบต์ด้วย Giuseppe!

Ocaml, 46 ไบต์

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

และใน ocaml REPL เราสามารถประสบความสำเร็จได้ดีขึ้นโดยการลบletและสุดท้าย:():

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

ซึ่งคือ 41 ไบต์ (incuding 1 byte สำหรับการคืนค่าขนส่ง)

SAS, 36 ไบต์

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

TI-Basic 84+, 23 ไบต์

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

ต้องการคำสั่ง date & time ซึ่งมี 84+ ขึ้นไปเท่านั้น

MATLขนาด 12 ไบต์

vZ'8XOs309>)

ข้อผิดพลาดที่เกิดขึ้นในวันอาทิตย์คือ:

• ทำงานบนคู่:

  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
  

กับพฤติกรรมสลับ (ข้อผิดพลาดใด ๆ ในวันยกเว้นวันอาทิตย์), เพิ่มหลัง~>

ลองออนไลน์!

คำอธิบาย

วิธีนี้ใช้ประโยชน์จากความจริงที่ว่า

• การจัดทำดัชนีในอาเรย์ว่างด้วยดัชนีโลจิคัล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 ทำ modulo ของวันที่ปัจจุบันซึ่งคืนค่า int หากวันที่เป็นวันอาทิตย์, .zd mod 7 จะส่งกลับ 1 หาก 1 = 1, (ในวันอาทิตย์) และข้อผิดพลาดจะเพิ่มขึ้นโดยใช้ตัวดำเนินการ 'สำหรับช่วงเวลาสั้น ๆ ข้อผิดพลาดเป็นเพียงตัวอักษร e

C # (.NET Core) , 55 54 48 ไบต์

ลองออนไลน์!

บันทึก 1 ไบต์ขอบคุณ Shaggy

บันทึก 5 ไบต์ขอบคุณ Emigna

บันทึกแล้ว 1 ไบต์ขอบคุณ Kevin Cruijssen

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

โชคดีที่วันอาทิตย์ได้รับการจัดทำดัชนี 0 ใน enum มิฉะนั้นจะต้องเป็น (System.DayOfWeek)7

Groovyขนาด 16 ไบต์

1/new Date().day

ลองออนไลน์!

C,  68  55 ไบต์

ขอบคุณ @Ken YN สำหรับการบันทึก 13 ไบต์!

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

ลองออนไลน์!

R , 40 ไบต์

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

ลองออนไลน์!

weekdaysส่งคืนวันทำงานของวันที่ด้วยอาร์กิวเมนต์ที่เป็นทางเลือกabbreviateซึ่งย่อSundayให้สั้นลงSunและบันทึกไบต์เดียว

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

ลองมัน

Julia 0.5 , 28 ไบต์

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

ลองออนไลน์!

สิ่งนี้ใช้ไม่ได้กับ 0.6 แต่ใช้ได้กับ 0.4