dble.s

来自「UNIX v6源代码 这几乎是最经典的unix版本 unix操作系统设计和莱」· S 代码 · 共 21 行

/
/

/ dble fortran function

.globl	dble.

.globl	rval4p
.globl	lval
.globl	r4r8
.globl	gas8
.globl	retrn
.globl	temp

dble.:	temp
	lval; temp
	rval4p; 2
	r4r8
	gas8
	retrn