151 {AC(vm)=(SG_UNDEF),(vm)->valuesCount=(1);NEXT;}}  in CASE()
191 AC(vm)=(SG_UNDEF),  in CASE()
215 AC(vm)=(SG_UNDEF),  in CASE()
245 AC(vm)=(SG_UNDEF),  in CASE()
371 …SG_INTERN("/"),SG_MAKE_STRING("undefined for 0"),SG_LIST2(obj,AC(vm)));return (SG_UNDEF);}}else if(  in CASE()
553 AC(vm));return (SG_UNDEF);}}}  in CASE()
557 AC(vm));return (SG_UNDEF);}}}  in CASE()
611 …lation(SG_INTERN("apply"),SG_MAKE_STRING("improper list not allowed"),AC(vm));return (SG_UNDEF);}}}  in CASE()
750 AC(vm)=(SG_UNDEF);}CHECK_ATTENTION;NEXT;}  in CASE()
769 …ypeOfArgumentViolation(SG_INTERN("car"),SG_MAKE_STRING("pair"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()
779 …ypeOfArgumentViolation(SG_INTERN("cdr"),SG_MAKE_STRING("pair"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()
823 …ypeOfArgumentViolation(SG_INTERN("append"),SG_MAKE_STRING("list"),obj,SG_NIL);return (SG_UNDEF);}}}  in CASE()
893 {SgObject v=SG_UNDEF;  in CASE()
895 v=(Sg_MakeVector(val1,SG_UNDEF));  in CASE()
922 …tViolation(SG_INTERN("vector-length"),SG_MAKE_STRING("vector"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()
932 …rgumentViolation(SG_INTERN("vector-ref"),SG_MAKE_STRING("vector"),obj,SG_NIL);return (SG_UNDEF);}}}  in CASE()
934 …mentViolation(SG_INTERN("vector-ref"),SG_MAKE_STRING("fixnum"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()
938 SG_LIST2(obj,AC(vm)));return (SG_UNDEF);}}}  in CASE()
950 …gumentViolation(SG_INTERN("vector-set!"),SG_MAKE_STRING("vector"),obj,SG_NIL);return (SG_UNDEF);}}}  in CASE()
954 SG_LIST1(obj));return (SG_UNDEF);}}}  in CASE()
956 …mentViolation(SG_INTERN("vector-set!"),SG_MAKE_STRING("fixnum"),index,SG_NIL);return (SG_UNDEF);}}}  in CASE()
960 SG_LIST2(obj,index));return (SG_UNDEF);}}}  in CASE()
962 {AC(vm)=(SG_UNDEF),(vm)->valuesCount=(1);NEXT;}}}}  in CASE()
1043 …eOfArgumentViolation(SG_INTERN("set-car!"),SG_MAKE_STRING("pair"),obj,SG_NIL);return (SG_UNDEF);}}}  in CASE()
1045 …_INTERN("set-car!"),SG_MAKE_STRING("attempt to modify constant literal"),obj);return (SG_UNDEF);}}}  in CASE()
1047 {AC(vm)=(SG_UNDEF),(vm)->valuesCount=(1);NEXT;}}}  in CASE()
1057 …eOfArgumentViolation(SG_INTERN("set-cdr!"),SG_MAKE_STRING("pair"),obj,SG_NIL);return (SG_UNDEF);}}}  in CASE()
1059 …_INTERN("set-cdr!"),SG_MAKE_STRING("attempt to modify constant literal"),obj);return (SG_UNDEF);}}}  in CASE()
1061 {AC(vm)=(SG_UNDEF),(vm)->valuesCount=(1);NEXT;}}}  in CASE()
1069 …2,obj);return (SG_UNDEF);}}}} else {{Sg_WrongTypeOfArgumentViolation(SG_INTERN("caar"),SG_MAKE_STR…  in CASE()
1077 …2,obj);return (SG_UNDEF);}}}} else {{Sg_WrongTypeOfArgumentViolation(SG_INTERN("cadr"),SG_MAKE_STR…  in CASE()
1085 …2,obj);return (SG_UNDEF);}}}} else {{Sg_WrongTypeOfArgumentViolation(SG_INTERN("cdar"),SG_MAKE_STR…  in CASE()
1093 …2,obj);return (SG_UNDEF);}}}} else {{Sg_WrongTypeOfArgumentViolation(SG_INTERN("cddr"),SG_MAKE_STR…  in CASE()
1103 …ypeOfArgumentViolation(SG_INTERN("car"),SG_MAKE_STRING("pair"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()
1113 …ypeOfArgumentViolation(SG_INTERN("cdr"),SG_MAKE_STRING("pair"),AC(vm),SG_NIL);return (SG_UNDEF);}}}  in CASE()