Download code

Jump to: navigation, search

Back to Quine_(Oz)

Download for Windows: single file, zip

Download for UNIX: single file, zip, tar.gz, tar.bz2

Quine.oz

 1 % The authors of this work have released all rights to it and placed it
 2 % in the public domain under the Creative Commons CC0 1.0 waiver
 3 % (http://creativecommons.org/publicdomain/zero/1.0/).
 4 % 
 5 % THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 6 % EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 7 % MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
 8 % IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
 9 % CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
10 % TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
11 % SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
12 % 
13 % Retrieved from: http://en.literateprograms.org/Quine_(Oz)?oldid=11523
14 
15 functor
16 import
17    System
18    Application
19 define
20    proc {Quine Data}
21       {System.showInfo Data # [34] # Data # [34 &} &
22 ] # 'end'}  
23       {Application.exit 0}
24    end
25    
26    {Quine "functor
27 import
28    System
29    Application
30 define
31    proc {Quine Data}
32       {System.showInfo Data # [34] # Data # [34 &} &
33 ] # 'end'}  
34       {Application.exit 0}
35    end
36    
37    {Quine "}
38 end
39 


hijacker
hijacker
hijacker
hijacker