X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcasl2lib_driver%2Fdivl1.casl;fp=as%2Fcasl2lib_test%2Fdivl_call1.casl;h=bd84ab33ee3d3071125f4d518ad2bfa9919aad36;hp=5b2206664a4b2456385dbc459c606587803ebc46;hb=955b8eab6e12f9d9704d7f9bd1f12613a57a6ca0;hpb=4fe8479d27f535a0ff44c9f6ce270249934e980f diff --git a/as/casl2lib_test/divl_call1.casl b/as/casl2lib_driver/divl1.casl similarity index 55% rename from as/casl2lib_test/divl_call1.casl rename to as/casl2lib_driver/divl1.casl index 5b22066..bd84ab3 100644 --- a/as/casl2lib_test/divl_call1.casl +++ b/as/casl2lib_driver/divl1.casl @@ -1,7 +1,12 @@ -;;; casl2 div0_call0.casl div0.casl outl.casl +;;; casl2 divl1.casl ../casl2lib/outl.casl MAIN START BEGIN LD GR1,X + CALL OUTL LD GR2,Y + PUSH 0,GR1 + LD GR1,GR2 + CALL OUTL + POP GR1 CALL DIVL LD GR1,GR0 CALL OUTL @@ -9,5 +14,5 @@ BEGIN LD GR1,X CALL OUTL RET X DC 123 -Y DC 10 +Y DC 10 END