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

-- 
You received this message because you are subscribed to the Google Groups 
"ats-lang-users" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to ats-lang-users+unsubscr...@googlegroups.com.
To post to this group, send email to ats-lang-users@googlegroups.com.
Visit this group at https://groups.google.com/group/ats-lang-users.
To view this discussion on the web visit 
https://groups.google.com/d/msgid/ats-lang-users/CAEvX6dnzBV0ZNL%3DYY%2BPs8jFymN0_iNRzL8MQw4_OhL2j782XXg%40mail.gmail.com.

Reply via email to