2015-10-13 41 views
4

我正在学习Erlang,我试图从一个进程传递消息到另一个从stdio输入一些输入。爱尔兰badarith IO输入

这是我有的代码(我知道我可以使用正常的功能,但这不是主题)。

-module(play). 

-compile(export_all). 

calculateArea() -> 
    receive 
    {rectangle, W, H,SenderPID} -> SenderPID ! {area,W * H}; 
    {circle, R,SenderPID} -> SenderPID ! {area,3.14 * R * R}; 
    _ -> io:format("We can only calculate area of rectangles or circles.") 
    end, 
    calculateArea(). 

doStuff() -> 
    CalculateArea = spawn(play,calculateArea,[]), 
    {ok,Width} = io:fread("Enter width","~d"), 
    {ok,Height} = io:fread("Enter height","~d"), 
    CalculateArea ! {rectangle,Width,Height,self()}, 
    receive 
    {area,Size} -> io:write(Size) 
    end, 
    io:fwrite("done"). 

当我运行play:doStuff().我得到一个{badarith,[{play,calculateArea,0,[{file,"play.erl"},{line,10}]}]}错误。

我不明白为什么,根据文档,“〜d”会给我一个十进制值,它肯定看起来像是如果我打印它。

这里有什么?

回答

4

io:fread返回

Result = {ok, Terms :: [term()]} 
     | {error, {fread, FreadError :: io_lib:fread_error()}} 
     | server_no_data() 

所以WidthHeight将含有各一个单一的数字列表。通过使用{ok, [Width/Height]} = ...修复。

相关问题