float.s

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

/
/

/ float fortran function

.globl	float.

.globl	rval4p
.globl	lval
.globl	gas4
.globl	i4r4
.globl	retrn
.globl	temp

float.:	temp
	lval; temp
	rval4p; 2
	i4r4
	gas4
	retrn