Tại sao Forth sử dụng câu lệnh IF THEN ... thay vì ENDIF?

Question

Tại sao Forth sử dụng câu lệnh IF THEN ... thay vì ENDIF?

Tôi đang triển khai một trình biên dịch Forth (không phù hợp). Về cơ bản, cú pháp của Forth xuất hiện rất trực quan đối với tôi về các câu lệnh IF.

IF ."Statement is true" 
ELSE ."Statement is not true" 
THEN ."Printed no matter what; 

Tại sao câu lệnh kết thúc là THEN? Điều này làm cho ngôn ngữ đọc cực kỳ kỳ lạ đối với tôi. Đối với trình biên dịch của tôi, tôi đang xem xét thay đổi nó thành một cái gì đó như ENDIF mà đọc tự nhiên hơn. Nhưng, lý do đằng sau những câu lệnh IF-THEN ngược lại ở nơi đầu tiên là gì?

Answer 1

Chỉ cần nghĩ về nó như "IF đó là trường hợp, làm được điều này, ELSE làm điều đó ... và THEN tiếp tục với ..."

Hoặc tốt hơn, trích dẫn sử dụng (như trong Factor, RetroForth, ...) trong trường hợp đó là hoàn toàn postfix mà không có các từ biên dịch đặc biệt; chỉ các từ thông thường lấy địa chỉ từ ngăn xếp: [ do this ] [ do that ] if hoặc [ do this ] when hoặc [ do that ] unless. Cá nhân tôi rất thích điều này.

Ngoài RE: danh ngôn

Đây là how quotations are compiled in RetroForth. Trong Forth của riêng tôi (mà biên dịch cho máy ảo của riêng tôi), tôi chỉ cần thêm một lệnh QUOTE đẩy địa chỉ tiếp theo vào ngăn xếp và nhảy qua n-byte. Các n-byte được mong đợi sẽ bị chấm dứt bởi lệnh RETURN và các từ if, when, unless tiêu thụ vị từ cùng với địa chỉ được để lại bởi các trích dẫn trước; gọi điện thoại thích hợp. Rất đơn giản, và các trích dẫn thường mở cửa cho all kinds of beautiful abstractions away from thinking about the stack.