Tôi là một nhà phát triển và tôi không cảm thấy muốn làm việc của mình. Tôi biết từ XKCD rằng lý do tốt nhất để giải quyết vấn đề là mã của bạn đang biên dịch . Bởi vì điều này, tôi nghĩ rằng tôi cần một số mã sẽ biên dịch mãi mãi! Và bởi vì tôi lười biếng và không muốn phải gõ nhiều, điều này phải được thực hiện với mã ngắn nhất có thể.

Vì vậy, nhiệm vụ của bạn là viết một chương trình có giá trị cú pháp, nhưng sẽ khiến trình biên dịch đi vào một vòng lặp vô hạn.

Thông số kỹ thuật

• Bạn phải sử dụng một ngôn ngữ có trình biên dịch, rõ ràng.
• Chỉ định việc thực hiện được sử dụng trong mỗi giải pháp.
• Đây là môn đánh gôn , vì vậy giải pháp hợp lệ ngắn nhất (tính bằng byte) sẽ thắng.
• Trình biên dịch có thể chấm dứt do hết bộ nhớ hoặc không gian ngăn xếp.

Japt , 2 byte

`ÿ

Bạn có thể kiểm tra điều này trực tuyến tại đây , nhưng tôi không khuyến nghị vì nó sẽ đóng băng trình duyệt của bạn.

Giải trình

Japt sử dụng thư viện shoco để nén chuỗi. Một backtick báo cho trình biên dịch giải nén mọi thứ cho đến khi backtick tiếp theo hoặc kết thúc tập tin. Mỗi byte thực hiện như sau:

• 00-7F được giữ nguyên.
• 80-BFtừng hóa thân thành một cặp hai chữ cái viết thường chung ( at, oo, th, vv).
• C0-DFmỗi cái tiêu thụ byte kế tiếp và biến thành một chuỗi bốn chữ cái chung .
• E0-EFmỗi cái tiêu thụ ba byte tiếp theo và chuyển đổi thành một chuỗi tám chữ cái "chung" (bắt đầu từ Whererervà xuống dốc từ đó).
• F0-F7 phá vỡ bộ giải nén, mặc dù nó vẫn trả về mọi thứ cho đến khi ngắt byte.
• F8-FFlàm cho bộ giải nén đi vào một vòng lặp vô hạn. Tôi không chắc tại sao lại như vậy, vì tôi không quen lắm với hoạt động bên trong của thư viện shoco (và mã JavaScript hoàn toàn không thể đọc được ), nhưng trong trường hợp này khá tiện dụng.

Tôi không tin có bất kỳ cách nào khác để gây rối với trình biên dịch Japt, nhưng bạn không bao giờ biết ...

TikZ (pdfTeX 3.14159265-2.6-1.40.17), 85 79 74 24 22 21 byte

Một bó byte được lưu nhờ vào wchargein

Một byte được lưu nhờ Chris H

\input tikz
\tikz\pic

Tôi thực sự gặp phải điều này một cách tình cờ khi tôi đang làm bài tập về nhà. Tôi đã dành khá nhiều thời gian chờ đợi nó được biên dịch trước khi tôi nhận ra những gì đang xảy ra.

Điều này có hai phần:

\input tikz

Điều này tải gói TikZ

và:

\tikz\pic

Điều này bắt đầu một \tikzmôi trường và một lệnh vẽ.

Chuyện gì đang xảy ra vậy

Trình biên dịch pdflatex gặp sự cố \tikz\picvà vào chế độ tương tác khiến nó bị đình trệ vô thời hạn.

C, 18 byte

#include __FILE__

Trình biên dịch thường sẽ bỏ cuộc sau khi đệ quy khoảng 200 lần.

Xây dựng DOM có được tính là một bước biên dịch không? Nếu vậy, thì x.htm:

<iframe src=x.htm>

Java, 102 95 89 88 78 byte

class A<T>{}class B<T>extends A<A<?super B<B<T>>>>{A<?super B<A>>a=new B<>();}

Điều này chấm dứt với một StackOverflowErrorđiều xảy ra bởi vì hệ thống phân giải chung không thể quyết định một gốc để giải quyết các tổng quát khác.

Tín dụng do đến hạn .

chuyện gì xảy ra ở đây thế?

1. A<T>chỉ ở đó để có một phụ huynh 1 chữ cái. Đó là chung chung. Tôi có thể đã sử dụng List, nhưng việc nhập và lặp lại 4 chữ cái quá dài.
2. B<T> tuyên bố chung chung cơ bản.
3. B extends Ađược yêu cầu phải có một hệ thống phân cấp giữa Bvà A.
4. extends A<A>tạo một tài liệu tham khảo tự A<T>.
5. A<? super B> kích hoạt việc tìm kiếm thuốc generic trên A<T>
6. B<B<T>>tạo một tài liệu tham khảo tự B<T>.
7. A<...> a=new B<>()buộc sử dụng các tổng quát, thay vì chỉ đơn giản là định nghĩa của các tổng quát, buộc độ phân giải khi biên dịch B, và không sau đó.
8. A<?super Btạo ra một tham chiếu không tự, vì vậy chúng ta có cả một tham chiếu đến một loại và một loại khác trong các tổng quát của A.
9. B<A>tạo ra một tham chiếu không tự, vì vậy chúng ta có cả một tham chiếu đến một loại và một loại khác trong các tổng quát của B.

Bây giờ, loại Acó loại generic Avà B, nhưng được chọn? Quên đi bản thân, hãy cố gắng giải quyết B. Bình.

Được rồi, Bcó loại thuốc generic Avà B, nhưng cái nào sẽ được chọn? Quên đi bản thân, hãy cố gắng giải quyết A. Pông.

Loại đệ quy này thực sự không thể tránh được vì có những trường hợp hợp pháp như A<B<A<B<A<B<Object>>>>>>: ví dụ: một đối tượng JSON : List<Map<String,Map<String,List<Map<String,List<String>>>>>>.

Kết quả tổng hợp

$ javac NoCompile.java


The system is out of resources.
Consult the following stack trace for details.
java.lang.StackOverflowError
        at com.sun.tools.javac.code.Types$UnaryVisitor.visit(Types.java:3260)
        at com.sun.tools.javac.code.Types$23.visitClassType(Types.java:2587)
        at com.sun.tools.javac.code.Types$23.visitClassType(Types.java:2579)
        at com.sun.tools.javac.code.Type$ClassType.accept(Type.java:554)
        at com.sun.tools.javac.code.Types$UnaryVisitor.visit(Types.java:3260)
        at com.sun.tools.javac.code.Types$23.visitClassType(Types.java:2592)
        at com.sun.tools.javac.code.Types$23.visitClassType(Types.java:2579)
        at com.sun.tools.javac.code.Type$ClassType.accept(Type.java:554)

Trên hệ thống của tôi, dấu vết ngăn xếp dừng lại sau khi hiển thị 1024 dòng, thực tế là 4 dòng giống nhau được lặp lại 256 lần, do đó chứng minh một đệ quy vô hạn. Tôi sẽ dành cho bạn toàn bộ dấu vết đó.

Tiết kiệm

1. 102 → 95 byte: thay thế interface+ implementsbằng class+ extends.
2. 95 → 89 byte: được thay thế Longbằng A(hai lần).
3. 89 → 88 byte: toán tử kim cương đã sử dụng ( new B<A>()→ new B<>()).
4. 88 → 78 byte: đã chuyển khai báo biến sang một thành viên của lớp, nhờ vào VoteToClose .

GNU Makefile, 8 7 byte

Một byte được lưu nhờ KonradRudolph

Được lưu Makefilevà gọi bởi make:

x:;make

Điều này sẽ tạo ra một đệ quy xây dựng vô hạn trên mục tiêu đầu tiên được tìm thấy "x".

Không cần phải nói rằng bạn không thực sự muốn chạy quả bom ngã ba này trên máy chủ sản xuất của mình. :-)

make
make[1]: Entering directory `/path/to/my/dir'
make
make[2]: Entering directory `/path/to/my/dir'
make
make[3]: Entering directory `/path/to/my/dir'
make
make[4]: Entering directory `/path/to/my/dir'
make
make[5]: Entering directory `/path/to/my/dir'
make
make[6]: Entering directory `/path/to/my/dir'
make
make[7]: Entering directory `/path/to/my/dir'
make
...

Phiên bản thay thế, 5 byte

Được đề xuất bởi KonradRudolph:

x:;$_

$_là một tham chiếu đến đối số cuối cùng của lệnh trước đó. Cụ thể hơn, nó được giải quyết ở đây là đường dẫn tuyệt đối đến lệnh đang được thực thi - makechính là nó.

Điều này sẽ hoạt động tốt trong môi trường Bash chính hãng, nhưng không phải trên Windows + MinGW.

C ++, 60 58

template<class T>class a{a<T*>operator->();};a<int>i=i->b;

Điều này đệ quy tạo các trường hợp class avới các tham số mẫu khác nhau. GCC 7.0 dừng sau 900 cấp độ đệ quy với hàng tấn lỗi về chế độ operator->riêng tư, ví dụ ICC 17 và Microsoft (R) C / C ++ Tối ưu hóa Trình biên dịch hết thời gian 19 lần trên godbolt .

Vấn đề với điều đó là có lẽ tất cả các trình biên dịch sẽ hết bộ nhớ tại một số thời điểm vì vậy ngay cả khi không có giới hạn đệ quy, điều này sẽ dừng lại. Điều tương tự cũng có thể áp dụng cho câu trả lời Clojure.

Chỉnh sửa: 2 byte được lưu bởi bolov - Cảm ơn

Perl , 15 13 byte

BEGIN{{redo}}

Hãy thử trực tuyến!

Bây giờ với 2 byte được lưu: @Zaid nhắc nhở tôi về một cách khéo léo hơn để thực hiện một vòng lặp trong Perl.

Điều này khá đơn giản: nó chỉ cần cài đặt một trình phân tích cú pháp với một vòng lặp vô hạn, làm cho mã mất nhiều thời gian để phân tích cú pháp. (Perl rất hay ở chỗ nó cho phép bạn chạy mã tùy ý ở giữa phân tích cú pháp; các trình phân tích cú pháp được chỉ định trong chính Perl và thường được sử dụng để làm những việc như nhập thư viện hoặc thay đổi quy tắc phân tích cú pháp cho một mã định danh bạn muốn xử lý như một từ khóa.) Hãy thử trực tuyến! liên kết ở trên cung cấp -ctùy chọn (để biên dịch mã để xác minh cú pháp cho chính xác, nhưng không chạy nó), để chứng minh rằng vòng lặp vô hạn xảy ra tại thời điểm biên dịch.

Trong trường hợp bạn đang tự hỏi về "thời gian biên dịch" bằng ngôn ngữ kịch bản: Perl thực sự biên dịch thành mã byte và sau đó chạy mã byte, nhưng đây là một chi tiết hiếm khi có liên quan khi lập trình nó. Họ -MO=tùy chọn dòng lệnh có thể được sử dụng để thực hiện mọi thứ với mã byte ngoài việc chạy nó (mặc dù không phải với chương trình này, vì vòng lặp vô hạn xảy ra trước khi mã byte có thể được tạo).

C ++ 37 30 29 byte

int f(auto p){f(&p);},a=f(0);

Nó sử dụng tham số chức năng tự động trong tương lai. Nó đã được đề xuất vào C ++ 17, nhưng tôi không nghĩ nó đã được tạo ra. gcctuy nhiên hỗ trợ nó như một phần mở rộng.

Về cơ bản

void foo(auto p);

tương đương với

template <class T>
void foo(T p);

Mã cố gắng khởi tạo fđệ quy với các đối số khuôn mẫu khác nhau. gccthất bại với

lỗi nghiêm trọng: độ sâu khởi tạo mẫu vượt quá tối đa 900 (sử dụng -ftemplate-height = để tăng tối đa)

Với -ftemplate-depth=10000tôi đã có nó để nhổ "Kills - vượt quá thời gian xử lý" trên godbolt.

Kiểm tra nó trên godbolt

1 byte được lưu bởi Quentin. Cảm ơn bạn.

Lisp thông thường, 8 byte

#.(loop)

Trình biên dịch sẽ cố gắng đọc một biểu mẫu và sẽ gặp macro macro đọc sharpsign-dot , đánh giá mã tại thời điểm đọc và sử dụng kết quả của nó làm biểu mẫu để biên dịch. Ở đây, mã được thực thi là một vòng lặp vô hạn.

TeX, 9 byte

\def~{~}~

TeX hoạt động bằng cách mở rộng các macro. Hầu hết thời gian, các macro của TeX (còn được gọi là các chuỗi điều khiển ) có dạng \namenhưng cũng có thể định nghĩa một số ký tự là macro, chúng được gọi là các ký tự hoạt động . Ký tự ~được kích hoạt theo mặc định trong TeX đơn giản và do đó có thể được sử dụng làm tên macro mà không cần khai báo thêm. Cái \def~{~}ở trên định nghĩa ~để nó mở rộng ra ~. Đó là, bất cứ khi nào TeX gặp phải ~thì nó sẽ thay thế nó ~và sau đó kiểm tra lại sự thay thế, nghĩa là nó gặp một sự xuất hiện hoàn toàn mới ~và thay thế nó bằng cách ~. Điều này xác định vòng lặp vô hạn. Tất cả những gì cần thiết là bắt đầu vòng lặp và đó là những gì trận chung kết ~làm.

Đã thêm vào chỉnh sửa

Để thực hiện điều này được biên dịch đúng , hãy gọi là:

pdftex -ini "&pdftex \def~{~}~"

Các -inilá cờ nói rằng pdftexnên biên dịch một file định dạng mới. Đây là một tập hợp các định nghĩa được biên dịch sẵn có thể được tải khi TeX sau đó được gọi để tăng tốc độ xử lý tài liệu (LaTeX2e là một ví dụ về điều này). Tôi đoán rằng &pdftexthêm một vài byte, lấy tổng số là 17.

Haskell, 25 + 17 = 42 byte

a= $(let a='a':a in[|a|])

Một siêu dữ liệu Haskell đơn giản xác định một giá trị vô hạn và cố gắng tính giá trị đó tại thời gian biên dịch.

Gọi với ghc -XTemplateHaskell <file.hs>(+17 cho tham số cho trình biên dịch)

lớp, 10 9 byte

for(;;){}

với đoạn mã trên được đặt trong một build.gradletập tin. Gradle sử dụng Groovy làm ngôn ngữ cơ bản của nó vì vậy chúng tôi thực sự đang nói về Groovy ở đây, nhưng vì câu hỏi là về thời gian xây dựng nên tôi nghĩ rằng gradle sẽ phù hợp hơn.

Chạy bất kỳ lệnh xây dựng lớp nào với đoạn mã trên sẽ in dòng trạng thái xây dựng tương thích với ông chủ tóc nhọn:

$ gradle tasks
> Configuring > 0/1 projects > root project

nếu bạn đang muốn tăng lương, hãy thêm -dcờ gỡ lỗi cho:

$ gradle -d tasks
14:56:25.522 [INFO] [org.gradle.internal.nativeintegration.services.NativeServices] Initialized native services in: .gradle/native
14:56:25.757 [DEBUG] [org.gradle.launcher.daemon.client.DaemonClient] Executing build 84908c0d-f28d-4c57-be61-40eaf0025e16.1 in daemon client {pid=27884}
14:56:25.761 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding IP addresses for network interface tun0
14:56:25.762 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Is this a loopback interface? false
14:56:25.762 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Is this a multicast interface? false
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding remote address /x:x:x:x:x:x:%tun0
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding remote address /x.x.x.x
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding IP addresses for network interface eth1
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Is this a loopback interface? false
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Is this a multicast interface? true
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding remote address /x:x:x:x:x:x:%eth1
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding remote address /x.x.x.x
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding remote multicast interface eth1
14:56:25.764 [DEBUG] [org.gradle.internal.remote.internal.inet.InetAddresses] Adding IP addresses for network interface lo
<snip>
14:57:07.055 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Releasing lock on daemon addresses registry.
14:57:07.056 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Waiting to acquire shared lock on daemon addresses registry.
14:57:07.056 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Lock acquired.
14:57:07.056 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Releasing lock on daemon addresses registry.
> Configuring > 0/1 projects > root project

mà ngoài việc tìm kiếm ấn tượng phức tạp cũng cập nhật với một bộ mới:

15:07:57.054 [DEBUG] [org.gradle.launcher.daemon.server.Daemon] DaemonExpirationPeriodicCheck running
15:07:57.054 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Waiting to acquire shared lock on daemon addresses registry.
15:07:57.054 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Lock acquired.
15:07:57.055 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Releasing lock on daemon addresses registry.
15:07:57.055 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Waiting to acquire shared lock on daemon addresses registry.
15:07:57.055 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Lock acquired.
15:07:57.055 [DEBUG] [org.gradle.cache.internal.DefaultFileLockManager] Releasing lock on daemon addresses registry.

các dòng trạng thái cứ sau 10 giây làm cho nó trông giống như bản dựng đang bận thực hiện các công cụ ... kỹ thuật quan trọng.

SWI-Prolog, 34 byte

term_expansion(_,_):-repeat,1=0.

Giải trình

term_expansion/2 là một cái gì đó được trình biên dịch gọi tự động trước khi thực sự biên dịch mã để chuyển đổi một số thuật ngữ trong mã nguồn thành các thuật ngữ khác.

Ở đây, chúng tôi giới thiệu một quy tắc mới cho term_expansion/2: repeat,1=0..

repeat/0 là một vị ngữ luôn luôn thành công và cung cấp vô số điểm lựa chọn.

1=0đang cố gắng để thống nhất 1với 0, đó là luôn luôn false. Điều này sẽ khiến trình biên dịch quay lại repeat(vì nó luôn cung cấp một điểm lựa chọn) và thử 1=0lại, v.v.

GNU Make, 44

.PHONY:x
$(MAKEFILE_LIST):x;sleep 1;touch $@

Tôi không thể yêu cầu tín dụng cho việc này. Nó được lấy từ cuốn sách của Robert Mecklenburg Quản lý các dự án với GNU Make: Sức mạnh của GNU Make để xây dựng bất cứ điều gì .

Khi thực hiện lệnh Makefile này, nó sẽ thấy tệp Makefile đã hết hạn (vì mục tiêu .PHONY đã hết hạn, do đó, nó thực thi lệnh cảm ứng, cập nhật dấu thời gian của tệp tạo tệp. Sau đó, hãy đọc lại tệp và phát hiện ra tệp makefile đã hết hạn .... Vâng, bạn hiểu ý.

Tôi thích câu này hơn câu trả lời Make khác vì nó không sử dụng đệ quy. Trên máy ảo của tôi, câu trả lời Tạo khác tiếp tục thực hiện các quy trình và ở đâu đó sâu khoảng 7.000, VM bị dừng lại không phản hồi. Tuy nhiên, với câu trả lời này, nó có thể tiếp tục vô thời hạn mà không ăn hết tài nguyên hệ thống. Bạn thực sự sẽ có thể buông lơi với bản dựng này. Tôi đã trải qua hơn 1.000.000 lần lặp mà không có sự xuống cấp hệ thống rõ ràng.

Lưu ý tôi đã phải thêm sleep 1để dấu thời gian makefile thực sự được cập nhật mỗi lần. Bạn có thể thay đổi điều này thành sleep 0.01nếu bạn muốn nó ghi nhanh hơn các lần lặp nhanh hơn một chút.

GNU Forth, 15 byte

Chơi gôn

: : [do] [loop]

Định nghĩa lại (biên dịch lại) từ :và gọi một vòng lặp vô hạn ngay lập tức [do] [loop]bên trong định nghĩa mới (ngay tại thời điểm biên dịch).

Một loại từ không được biên dịch. Những từ được gọi là các từ ngay lập tức được thực thi (được thực hiện ngay bây giờ) bất kể trình thông dịch văn bản đang phiên dịch hay biên dịch.

Dùng thử trực tuyến!

Clojure, 21 byte

(defmacro a[]`(a))(a)

Liên kết trình biên dịch bằng cách xác định một macro liên tục phát ra các cuộc gọi đến chính nó.

Trên điện thoại của tôi, điều này khiến REPL bị treo và lag thiết bị. Trên máy tính xách tay của tôi, điều này không thành công với StackOverflow.

Thật không may, StackOverflow xảy ra ngay lập tức, nhưng nó vẫn hợp lệ theo các quy tắc.

MSBuild, 130 byte

<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
    <Target Name="X">
        <Exec Command="msbuild"/>
    </Target>
</Project>

Lưu tệp này dưới dạng tệp có .projphần mở rộng và chạy với msbuildtừ dấu nhắc lệnh. MSBuild sẽ chạy mục tiêu duy nhất của nó mà chỉ đơn giản là sinh ra một msbuildquá trình khác .

C, 31 byte

main[-1llu]={1};

Lấy cảm hứng từ chấn thương kỹ thuật số . Biên dịch với -mcmodel=mediumcờ.

Chúc may mắn biên dịch được điều này, bạn sẽ cần 1,8 yottabyte RAM và dung lượng ổ đĩa.

Toán học 33 byte

Compile[{},Evaluate@While[True,]]

Mã sẽ cố gắng đánh giá một cách tượng trưng đối số trước khi biên dịch và chính đối số là một vòng lặp vô hạn. Hàm While có đối số thứ hai null vì nó không quan trọng.

Haskell _{^{(GHC, không có Mẫu Haskell hoặc quy tắc viết lại tùy chỉnh)}} , 138

{-#LANGUAGE FlexibleContexts,UndecidableInstances#-}
data A x=A
class C y where y::y
instance C(A(A x))=>C(A x)where y=A
main|A<-y=pure()

Về mặt lý thuyết, điều này đi vào một vòng lặp vô hạn theo cách tương tự như phương pháp C ++ thực hiện : phương pháp đa hìnhy được khởi tạo thành các kiểu phức tạp hơn bao giờ hết. Trong thực tế, kích thước ngăn xếp được phân bổ mặc định thực sự tràn ra nhanh chóng:

$ ghc-7.10 wtmpf-file14146.hs 
[1 of 1] Compiling Main             ( wtmpf-file14146.hs, wtmpf-file14146.o )

wtmpf-file14146.hs:5:9:
    Context reduction stack overflow; size = 101
    Use -fcontext-stack=N to increase stack size to N
      C (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A (A t0))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
    In a stmt of a pattern guard for
                   an equation for ‘main’:
      A <- y
    In an equation for ‘main’: main | A <- y = pure ()

Tín dụng cho Luke Palmer .

Haskell (ghc), 32 + 2 = 34 byte

{-#RULES""main=main#-}
main=main

chạy với ghc -O <file>. Kích hoạt một quy tắc viết lại cho chức năng chính viết lại cho cùng một điều. Tính năng đáng tiếc duy nhất là ghc đủ thông minh để phát hiện điều này và dừng lại sau 100 lần lặp. Tôi không biết một cách dễ dàng để vô hiệu hóa hành vi này.

Boo, 25 byte

macro l:
 x=0 while 1>0
l

Điều này xác định một macro, thực thi tại thời gian biên dịch, thực thi một vòng lặp vô hạn, và sau đó gọi macro.

Rust, 18 byte

include!(file!());

Cổ điển tự bao gồm. Mặc dù vậy, Rustc rất khó chịu và theo mặc định sẽ giải cứu sau 128 lần thu hồi và nó mở rộng chiều sâu trước tiên để tăng trưởng theo cấp số nhân cũng không hoạt động. Điều tương tự cũng áp dụng cho các giải pháp C và C ++.

Yếu tố , 29 16

<< [ t ] loop >>

Phần giữa << >> được thực hiện tại thời điểm phân tích.

Đối với những gì [ t ] loop này, tôi sẽ để bạn đoán ...

Bạn có thể đặt nó trong Trình nghe, hoặc thêm nó vào bất kỳ tập tin từ vựng hoặc tập lệnh nào với nội dung soạn sẵn tương ứng.

PHP, 19 byte

<?include __FILE__;