PL/M语言编译器,可以把PL/M源代码编译成x86原生程序。 PL/M是一种在70年代很先进的编程语言,据说第一个微机操作系统——CP/M就是在它的启发下开发出来的。 贴上一段代码,看起来是BASIC和C的混合体: main: PROCEDURE BYTE PUBLIC; DECLARE exit_code BYTE; DECLARE i BYTE, temp BYTE; DECLARE error_code WORD; DECLARE handle WORD; /* TEST FOR WORD MULTIPLICATION DECLARE (x,y,z) DWORD; x=1;y=12345678H; z=x+y-1; z=x*y; */ IF param_count=0 THEN DO; CALL put_string(@('No parameters Passed',13,10,0)); END; ELSE DO; CALL put_string(@mesg); exit_code=put_dec_num(param_count); CALL new_line; DO i=0 TO param_count-1; CALL put_string(@('Param ',0)); temp=put_dec_num(i); CALL put_string(@(' : "',0)); CALL upper(param_list(i)); CALL put_string(param_list(i)); CALL put_string(@('"',13,10,0)); END; END; |