Отправлено дядя Федя aka yes 11 января 2001 г. 16:41 В ответ на: Дядя Федя прав, но...(+) отправлено Владимир Стешенко 11 января 2001 г. 15:04

привести из рабочего проекта - низзя

(да и AHDL/Abel я не знаю - что-то типа ПАЛАСМа? - может пример на Абеле проще будет)

но вот например АЛУ ПИКа - какое описание будет на другом языке????

always @(a or b or cin or op) begin
case (op) // synopsys full_case parallel_case
ALUOP_ADD: {addercout, y} <= a + b;
ALUOP_SUB: {addercout, y} <= a - b; // Carry out is really "borrow"
ALUOP_AND: {addercout, y} <= {1'b0, a & b};
ALUOP_OR: {addercout, y} <= {1'b0, a | b};
ALUOP_XOR: {addercout, y} <= {1'b0, a ^ b};
ALUOP_COM: {addercout, y} <= {1'b0, ~a};
ALUOP_ROR: {addercout, y} <= {a[0], cin, a[7:1]};
ALUOP_ROL: {addercout, y} <= {a[7], a[6:0], cin};
ALUOP_SWAP: {addercout, y} <= {1'b0, a[3:0], a[7:4]};
default: {addercout, y} <= {1'b0, 8'h00};
endcase
end