埃菲尔环路测试程序

Question

我正在学习埃菲尔语言并尝试做一些基本的事情，如下所示：

class
    APPLICATION

inherit
    ARGUMENTS

create
    make
feature  
        make
local
        testvar:INTEGER
        i:INTEGER
 do
from
    i := 0
until
    i >= 10

loop
    Io.putstring ("input number")
    Io.read_integer
    testvar:= Io.last_integer
    if
        testvar>=2
    then
        Io.putstring ("bigger")
        i:=i+1
    else
        Io.putstring ("smaller")
        i:=i+1
        Io.put_integer(testvar)
 end
 end

基本上我只是测试一个循环，它读取整数并在屏幕上打印更大或更小，直到 "i" 达到 10.However，这无法编译，它与我的循环有关我 think.What 我做错了吗？

谢谢

Answer 1

您缺少 2 个 "end"。您需要一个 "end" 来关闭 "if"，另一个来关闭 "loop"，另一个来关闭 "make"例程最后又一个关闭了Class"APPLICATION"。所以需要 4 "end" 而你只有 2.

埃菲尔环路测试程序

Eiffel loop test program

integer

loops

eiffel