I found a quine using ATS language

39 views
Skip to first unread message

Kiwamu Okabe

unread,
Jul 1, 2016, 4:59:11 PM7/1/16
to ats-lang-users
Hi all,

Today, I found a quine using ATS language.
It's a project by NANAKASE Kotoko.

```
$ wget https://raw.githubusercontent.com/MakeNowJust/quine/master/quine.dats
$ patscc quine.dats
$ ./a.out
val q = '"'; val s = @("val q = '", "'; val s = @(", "); implement
main0 () = (print s.0; print q; print s.1; print q; print s.0; print
q; print s.3; print q; print s.1; print q; print s.3; print q; print
s.2; print q; print s.3; print q; print s.3; print q; print s.2;
print_newline ())", ", "); implement main0 () = (print s.0; print q;
print s.1; print q; print s.0; print q; print s.3; print q; print s.1;
print q; print s.3; print q; print s.2; print q; print s.3; print q;
print s.3; print q; print s.2; print_newline ())
```

Very fun!
--
Kiwamu Okabe at METASEPI DESIGN

gmhwxi

unread,
Jul 1, 2016, 5:22:52 PM7/1/16
to ats-lang-users, kiw...@debian.or.jp
Great!

I put it here:

https://glot.io/snippets/eg5hyv7nmo

Since you have mentioned source of the code, I assume that there is no copyright infringement here.

Kiwamu Okabe

unread,
Jul 1, 2016, 5:51:15 PM7/1/16
to ats-lang-users
On Sat, Jul 2, 2016 at 6:22 AM, gmhwxi <gmh...@gmail.com> wrote:
> Since you have mentioned source of the code, I assume that there is no
> copyright infringement here.

I also think no problem, because the license is WTFPL

https://github.com/MakeNowJust/quine#license
https://en.wikipedia.org/wiki/WTFPL
Reply all
Reply to author
Forward
0 new messages