Inspirado por Tivemos um teste de unidade uma vez que só falhou aos domingos , escreva um programa ou função que não faça nada além de gerar um erro quando for domingo e saia normalmente em qualquer outro dia.

Regras:

• Não é possível usar entrada ou mostrar saída através dos métodos usuais de E / S , exceto para imprimir em STDERR ou equivalente no seu idioma. Você pode imprimir em STDOUT se for um subproduto do seu erro.
• Uma função pode retornar um valor fora dos domingos, desde que não imprima nada
• Seu programa pode usar um domingo de qualquer fuso horário ou do fuso horário local, desde que consistente.
• Um erro é algo que faz com que o programa seja encerrado de maneira anormal , como um erro de divisão por zero ou usando uma variável não inicializada. Isso significa que, se algum código fosse adicionado após a parte que comete erros, ele não seria executado no domingo.
  • Você também pode usar instruções que criam manualmente um erro, equivalente ao do Python raise.
  • Isso inclui erros de tempo de execução, erros de sintaxe e erros durante a compilação (boa sorte com isso!)
• Em um erro, deve haver algum sinal que o distinga de não ter erro
• Isso é código-golfe , então o número de bytes mais curto em cada idioma vence!

Vou ter que esperar até domingo para verificar as respostas;)

Bash + coreutils, 15 14 bytes

`date|grep Su`

Experimente online!

PHP 7, 12 bytes

1%date("w");

No PHP 7, lança uma exceção do tipo DivisionByZeroaos domingos. O mesmo acontece se for interpretado usando HHVM .

No PHP 5, ele exibe um aviso (ativado stderr) aos domingos:

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

Em qualquer versão do PHP, ele não exibe nada nos outros dias da semana.

Execute usando a CLI:

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

ou experimente online!

Mais dois bytes pode ser espremido por stripping as aspas ( 1%date(w);), mas isso provoca um aviso (que pode ser suprimida por configurado corretamente error_reporting = E_ALL & ~E_NOTICEno php.ini).

PHP, 15 bytes

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

Assume as configurações padrão .

Saída aos domingos

Fatal error: Undefined constant 'n' on line 1

Experimente online!

Java 8, 69 43 34 bytes

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

-26 bytes graças a @ OlivierGrégoire .
-9 bytes graças a @Neil .

Explicação:

Experimente aqui.

• v->{...}( parâmetro não utilizadoVoid null ) é um byte menor que ()->{...}(sem parâmetro).
• new java.util.Date().getDay()retornará 0-6 para domingo e sábado; portanto, 1/...ocorrerá um java.lang.ArithmeticException: / by zeroerro se o valor for 0, o que acontece apenas aos domingos.

Python 3 , 33 bytes

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

Experimente online!

Python 3 , 50 bytes

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

Experimente online!

Economizou ~ 3 bytes graças a Rod .

Pitão , 8 7 bytes

 l-6.d9

Experimente online!

Explicação

    .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 bytes

import Data.Dates
succ.dateWeekDay<$>getCurrentDateTime

Experimente online!

Isso usa o fato de que o domingo é o último dia da semana. dateWeekDayretorna o dia da semana como um WeekDaytipo, que é simplesmente definido como

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

WeekDayé uma instância de Enum, portanto, podemos usar succe predobter o sucessor ou predecessor de um dia da semana, por exemplo, succ Mondayrendimentos Tuesday.

No entanto, Sundayé a última entrada da enumeração, portanto, a chamada succ Sundayresulta no seguinte erro:

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

Edit 1: Obrigado a nimi por -3 bytes!
Edite 2: -11 bytes agora que as funções são permitidas.

Programa completo: 88 81 74 69 66 bytes

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

Experimente online!

pureé necessário para elevar o resultado de WeekDayvolta à Mônada IO. No entanto, Haskell vê que o valor não é produzido de forma alguma pelo programa; por mais preguiçoso que seja, a expressão não é avaliada; portanto, mesmo aos domingos, o programa não falha. Isso é por que$! é necessário, o que força a avaliação, mesmo que Haskell normalmente não avalie a expressão.

Abordagem anterior com Data.Time: 127 124 bytes

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

Experimente online! Estas são algumas importações impressionantes. Mude d<7para, por exemplo, d/=5para testar a falha na sexta-feira. Falha com a seguinte excepção: Non-exhaustive patterns in function c.

05AB1E , 45 44 bytes

Como o 05AB1E não foi incorporado para obter o dia da semana, usei a Regra de Zeller para calculá-lo.

Imprime uma nova linha para stderr no caso de um domingo (observável na exibição de depuração no TIO)

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

Experimente online!

Explicação

A fórmula geral utilizado é
DoW = d + [(13*(m+1))/5] + y + [y/4] + [c/4] - 2*c
Onde DoW=day of week, d=day, m=month, y=last 2 digits of year, c=centurye e expressão entre parêntesis ([] ) é arredondado para baixo.

Cada mês usado na fórmula corresponde a um número, onde Jan=13,Feb=14,Mar=3,...,Dec=12
Como temos o mês atual no formato mais comum Jan=1,...,Dec=12 , convertemos o mês usando a fórmula
m = (m0 + 11) % 14 + 1

Como um biproduto de março sendo o primeiro mês, janeiro e fevereiro pertencem ao ano anterior, o cálculo para determinação yse torna
y = (year - (m0 < 3)) % 100

O valor final DoWque obtemos é um int onde 0=Sat,1=Sun,...,6=Fri.
Agora, podemos lançar explicitamente um erro se o resultado for verdadeiro.

JavaScript, 23 bytes

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

Programa completo.

A variável knão deve ser definida.

JavaScript, 20 bytes por Rick Hitchcock

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

JavaScript, 19 bytes por apsillers

Date().match`Su`&&k

VBA / VBScript, 22 20 bytes

^{_{Economizou 2 bytes graças a Taylor Scott.}}

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

Isso deve ser executado na janela imediata. Weekday()retorna 1 (domingo) a 7 (sábado), criando um erro de divisão por zero no domingo. Caso contrário, nenhuma saída.

Ruby, 15 bytes

1/Time.now.wday

wdayretornará 0 no domingo, causando um erro ZeroDivisionError: dividido por 0. Por exemplo: 1/Time.new(2018,1,7).wday.

Perl 5 , 13 bytes

1/(gmtime)[6]

Experimente online!

Ported @ biketire's answerj

removeu 3 bytes com o lembrete de @ mik

jq, 42 caracteres

(Opção de linha de comando com código de 39 caracteres + 3 caracteres)

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

Apenas tentando uma abordagem diferente aqui: analise o número do dia da semana (0..6) como o número do dia do mês (1..31).

Exemplo de execução:

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"

Observe que jq lida apenas com datas UTC.

Experimente online!

C, 35, 34 27 bytes

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

-7 bytes com agradecimentos a @MartinEnder e @Dennis

Experimente online!

VBA 18 bytes

Isso depende da função integrada que date()retorna um número de dia que resta 1 se dividido por 7, portanto, pode ser específico do sistema operacional e / ou da CPU.

a=1/(date mod 7-1)

Ele é executado na janela Imediata do projeto VBA.

R , 31 bytes 30 bytes

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

Experimente online!

Nenhuma saída fora dos domingos, Error: object 'a' not found aos domingos.

format(Sys.Date(),'%u')foi a maneira mais curta que consegui encontrar para o dia da semana; ele gera um número de classe de personagem para o dia da semana, com 7 para os domingos. Podemos comparar com um numérico 7 e, se verdadeiro, tentar usar um objeto indefinido.

Guardou um byte graças a Giuseppe!

Ocaml, 46 bytes

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

e no ocaml REPL, podemos obter melhores resultados removendo oe letfinal :():

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

que é 41 bytes (incluindo 1 byte para o retorno de carro).

SAS, 36 bytes

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

TI-Basic 84+, 23 bytes

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

Precisa de comandos de data e hora, que são 84+ e superiores.

MATL , 12 bytes

vZ'8XOs309>)

O erro produzido aos domingos é:

• Em execução na oitava:

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

• Rodando no Matlab:

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

Para inverter o comportamento (erro em qualquer dia, exceto aos domingos), adicione ~depois >.

Experimente Online!

Explicação

Isso explora o fato de que

• a indexação em uma matriz vazia com o índice lógico falseé válida (e o resultado é uma matriz vazia, que não produz saída); enquanto que

• a indexação com truecausa um erro porque a matriz não possui uma primeira entrada.

Código comentado:

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 bytes

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

.zd retorna a data atual. mod faz o módulo da data atual, que retorna um int. Se a data for domingo, .zd mod 7 retornará 1. Se 1 = 1 (no domingo) e o erro for gerado usando o operador 'Para brevidade, o erro é apenas o caractere e.

C # (.NET Core) , 55 54 48 bytes

Experimente online!

Guardado 1 byte graças a Shaggy

Guardado 5 bytes graças a Emigna

Guardado 1 byte graças a Kevin Cruijssen

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

Sorte que domingo é indexado 0 em enum ou então ele precisaria ser (System.DayOfWeek)7

Groovy , 16 bytes

1/new Date().day

Experimente online!

C,  68  55 bytes

Agradecemos ao @Ken YN por salvar 13 bytes!

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

Experimente online!

R , 40 bytes

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

Experimente online!

weekdays retorna o dia da semana da data, com um argumento opcional abbreviate , que reduz SundayparaSun , salvando um único byte.

stopifnotlança um erro se, para cada argumento, não allsão TRUE, e gera um erro com uma mensagem indicando o primeiro elemento que não é TRUE, por isso, o erro éError: "Sun" is not TRUE

APL (Dyalog) , 23 bytes

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

Experimente online!

Gema , 40 caracteres

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

Tinha que especificar uma mensagem de erro, então escolha uma pequena: "S".

Exemplo de execução:

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

Funky , 21 bytes

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

os.date"%w"retorna o dia da semana atual no formato 0-6, onde 0 é domingo. Obter a lógica disso não é verdade apenas quando o dia da semana é 0, então domingo. Então apenas um básicoif(a){error()} garantirá que este programa apenas erros no domingo

Experimente online!

Perl 6 ,  29  21 bytes

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

Tente

die if now/86400%7+^3

Tente

Julia 0,5 , 28 bytes

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

Experimente online!

Isso não funciona com 0,6, mas com 0,4.