Narcissist: Difference between revisions
Content added Content deleted
(J) |
|||
| Line 21: | Line 21: | ||
Based upon the quine. Reads until EOF or newline from stdin, and writes "1" or "0" to stdout. |
Based upon the quine. Reads until EOF or newline from stdin, and writes "1" or "0" to stdout. |
||
<lang c>extern void*stdin;main(){ char*p = "extern void*stdin;main(){ char*p = %c%s%c,a[300],b[300];sprintf(a,p,34,p,34);fgets(b,300,stdin);putchar(48+!strcmp(a,b)); }",a[300],b[300];sprintf(a,p,34,p,34);fgets(b,300,stdin);putchar(48+!strcmp(a,b)); }</lang> |
<lang c>extern void*stdin;main(){ char*p = "extern void*stdin;main(){ char*p = %c%s%c,a[300],b[300];sprintf(a,p,34,p,34);fgets(b,300,stdin);putchar(48+!strcmp(a,b)); }",a[300],b[300];sprintf(a,p,34,p,34);fgets(b,300,stdin);putchar(48+!strcmp(a,b)); }</lang> |
||
=={{header|J}}== |
|||
<lang j>#!/j602/bin/jconsole |
|||
main=:3 : 0 |
|||
self=: '#!/j602/bin/jconsole',LF,'main=:',(5!:5<'main'),LF,'main''''',LF |
|||
echo self -: stdin'' |
|||
) |
|||
main''</lang> |
|||
Example use: |
|||
<lang>$ ./narcissist.ijs <narcissist.ijs |
|||
1 |
|||
</lang> |
|||
Note that this assumes a suitable os command line. |
|||
=={{header|JavaScript}}== |
=={{header|JavaScript}}== |
||